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i 
ABSTRACT 


We have conducted a systematic search for finite homomorphic images of several 
permutation and monomial progenitors, including 2*° : (2+ : Ss), 2*° : ((5 x 4) : Sa), 
DP Pgs O11) 2h eo), OPO GaP Oe (Ga Sa) 2 (B52 Ds), 
orto": Beil), 2*° ¢ Dis, 2° : 85, 11** 4, (4 <5), and 11” 34 Dig: We have found 
original symmetric presentations for several important groups such as the Mathieu 
sporadic simple groups My; and Mj2, Suzuki simple group szg, unitary group U(3, 4), 
Janko group Jj, simplectic groups S(4,4) and $(4,3), and projective special linear 
groups L3(4) and L3(7). We have also constructed, using the technique of double 
coset enumeration, the following groups, L2(11), $(4,3) : 2, Mii, and PGL(2,11). 


The isomorphism class of each of the finite images is also given. 
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Introduction 


The aim of group theory is the discovery and classification of groups. Sym- 
metric presentations give a uniform method for constructing finite groups. Since finite 
groups are composed of simple groups, we are most interested in simple groups. In 
Chapter 1 we will discuss some important definitions, lemmas, and theorems. In 
Chapter 2 we will begin to explore progenitors and the methods used to write them. 
In Chapter 3 we will solve extension problems in order to define our isomorphism 
types. Chapter 4 will focus on monomial progenitors and methods used to write 
these. Chapter 5 is dedicated to Double Coset Enumeration, both manual and com- 
puter based. In Chapter 6 we discuss Transitive Groups and explore certain transitive 


groups written on 20, 19, 11, and 6 letters. 


Chapter 1 


Preliminaries 


1.1 Definitions, Theorems, and Lemmas 


Definition 1.1. /Rot95/ If X is a nonempty set, a permutation of X is a bijection 
a:X —> X. We denote the set of all permutations of X by Sy. 


Definition 1.2. /Rot95/ If x © X anda € Sz, then a fixes x if a(x) = x anda 


moves x if a(x) # a. 


Definition 1.3. /Rot95] A (binary) operation on a nonempty set G is a function 
uw: GxG=>G. 


Definition 1.4. /Rot95] A semigroup (G,*) is a nonempty set G equipped with an 


associative operation *. 


Definition 1.5. /Rot95/ A group is a semigroup G containing an element e such 
that: 

(i) exa=a=are foralla €G; 

(ii) for everya€ G, there is an element b€ G withaxb=e=b*a. 
Definition 1.6. /Rot95/ A pair of elements a and b in a semigroup commutes if 
a*xb = bxa. A group (or a semigroup) is abelian if every pair of its elements 


comutes. 


Theorem 1.7. /Rot95/ If G is a group, there is a unique element e with exa = a = axe 


for alla € G. Moreover, for each a € G, there is a uniqueb € G with axb = e = bxa. 


We call e the identity of G and, ifaxb=e=bx*a, then we call b the inverse of a 


and denote it by a7. 


Corollary 1.8. /Rot95/ If G is a group anda € G, then 
(> =a, 
Definition 1.9. /Rot95/ Let (G,*) and (H,o) be groups. A function f :G = > H is 
a homomorphism if, for all a,b € G, 
f(axb) = f(la)o f(®). 


Definition 1.10. /Rot95/ An isomorphism is a homomorphism that is also a bi- 
jection. We say that G is isomorphic to H, denoted by G = H, if there exists an 
isomorphism f :G => H. 
Theorem 1.11. /Rot95] Let f : (G,*) => (G’,0) be a homorphism. 
(i) f(e)=e', where e! is the identity in G’ 

(ii) IfaeG, then f(a!) = f(a). 

(iti) IfaeG andne€Z, then f(a”) = f(a)”. 
Definition 1.12. /Rot95]/ A nonempty subset S of a group G is a subgroup of G if 
s€G implies s-! € G and s,t € G imply st € G. 


Theorem 1.13. /Rot95/ If S < G (i.e., if S is a subgroup of G), then S is a group 


in its own right. 


Theorem 1.14. /Rot95/ A subset S of a group G is a subgroup if and only if 1 € S$ 
and s,t€ S imply st"! € S. 


Definition 1.15. /Rot95/ If G is a group anda € G, then the cyclic subgroup 
generated by a, denoted by <a>, is the set of all powers of a. A group G is called 
cyclic if there isa€ G with G=< a>; that is, G consists of all the powers of a. 


Theorem 1.16. /Rot95/ If S is a subgroup of G and if t € G, then aright coset of 
S inG is the subset of G 


St ={st:s¢€ S} 


(a left coset is tS = {ts: 5 € S}). One calls t a representative of St (and also of 
tS’). 


Definition 1.17. /Rot95/ If S < G, then the index of S in G, denoted by [|G : S], is 
the number of right cosets of S in G. 


Definition 1.18. /Rot95/ If G is a group, then the order of G, denoted by |G|, is 


the number of elements in G. 


Theorem 1.19. /Rot95/ (Lagrange) 


If G is a finite group and S < G, then |S| divides |G| and |G: S] = |G|/|S|. 


Corollary 1.20. /Rot95/ If G is a finite group anda € G. Then the order of a 
divides |G]. 


Corollary 1.21. /Rot95/ If p is a prime and |G| = p, then G is a cyclic group. 


Definition 1.22. /Rot95/ A subgroup K < G is a normal subgroup, denoted by 
K 4G, ifgKg-!=K for every g €G. 


Definition 1.23. /Rot95/ A projective special linear group, PSL(n,F) is the set 


of alln x n matrices with determinant 1 over field F factored by its center: 


PSL(n,F) = L,(F) = Aas 


Definition 1.24. /Rot95/ A projective general linear group, PGL(n,F) is the 
set of alln x n matrices with nonzero determinant over field F factored by its center: 


GL(n, F) 


PGL(n,F) = FACCHICH De 


Definition 1.25. /Rot95/ A special linear group, SL(n,F) is the set of alln x n 


matrices with determinant 1 over field F. 


Definition 1.26. /Rot95/ A general linear group, GL(n,F) is the set of alln x n 


matrices with nonzero determinant over field F. 


Theorem 1.27. /Rot95/ (First Isomorphism Theorem). 
Let f : g => A be a homorphism with kernal K. Then K is a normal subgroup of G 
and G/K = im f. 


Theorem 1.28. /Rot95/ (Second Isomorphism Theorem). 
Let N and T be subgroups of G with N normal. Then NOT is normal in T and 
T/(NOT)SNT/N. 


Theorem 1.29. /Rot95/ (Third Isomorphism Theorem). 
Let K < H <G, where both K and H are normal subgroups of G. Then H/K is a 
normal subgroup of G/K and 


(G/K)/(H/K) = G/H 


Chapter 2 
Writing Progenitors 


2.1 Preliminaries 


Definition 2.1. /Rot95/ Let X be a set and A by a family of words on X. A group 
G has generators X and relations A if G = F/R, where F is a free group with 
basis X and R is the normal subgroup of F generated by A. We say < X|A > is a 


presentation of G. 


Definition 2.2. /Rot95/ Let G be a group. If H < G, the normalizer of H in G is 
defined by Na(H) = {a € GlaHa' = H} 


Definition 2.3. /Rot95/ Let G be a group. If H < G, the centralizer of H in G is: 
Ce(H) = {xe G: [x,h] =1 for allhe A}. 


Definition 2.4. /Rot95/ Let N be a group. The point stabiliser of w in N is given 
by: 


NY = {ne N|w" = w}, where w is a word in the t,’s. 


Definition 2.5. /Rot95/ Let a € G, where G is a group. The conjugacy class of a 
is given by a@ = {a9|g € G} = {g7laglg € G} 


Definition 2.6. /Rot95/ Let G be a group and X be a G-set. For x € X, the set 
x° = {x9|g € G} is a G-Orbit. 


Definition 2.7. /Rot95/ If x € G, then a conjugate of x in G is an element of the 
form axa~' for some a € G; equivalently, x and y are conjugate if y = ya(x) for some 


aeéG. 


Lemma 2.8. /Gril5/ (The Factoring Lemma) Factoring the progenitor m*" : N 
by (ti,tj) for 1 <i<j <n gives the group m": N. 


2.2 Permutation Progenitor (15: 4) 


In this section we will write a presentation for the progenitor 2*!° : (15: 4). 


Our control group N = (15: 4) has the following presentation. 


2 43 2 Vege 1 


ee 4 1 1 
N=< w,2,y, 2|w UE, 2, WL, W Te We (yz), wy 


1 


why, cy twey-tz > 


Since we have 2*!°, we will have 15 t’s of order 2. We let t ~ t,, which means 
that ¢ will commute with the stabilizer of 1 in N. We use MAGMA to find these 
permutations that stabilize 1 in N. 


N1:=Stabiliser(N,1); 
Permutation group Nl acting on a set of cardinality 15 
Order = 4 = 2°2 

(2, 11, 12, 8) (3, 14, 9, 13) (4, 7) (5, 6, 15, 10) 


Using our Schreier System, we see that this permutation is wy~! So we add this, as 


well as t, to our presentation of N to get a presentation for 2*!° : (15: 4). 


42 23 2 1,-1 1 Peed 12-1. 42 ay 
Cafu ewe 2 ew ee we ee a ae ae ey) 


Our progenitor is infinite, in order to make it finite we must factor by relations. 


2.3. Writing Relations 


2.3.1 First Order Relations 


First order relations are written in the form (mt?)’ = 1, where a € N and w 


is a word in the ¢;’s. We can exhaust all possible relations by computing the orbits of 


the centralizers of Conjugacy Classes of N. Continuing with our example from above, 


we find the classes of N = (15: 4). 


Table 2.1: Conjugacy Classes of N = (15 : 4) 


Class Representative of the class # of elements in the class 
On e€ 1 
Co = =x¥ = (1,9)(2, 7)(3, 14)(4, 10) (6, 8) (12, 15) 5 
C3. 2=(1,4,7)2,9, 10)(3, 6, 12)(5, 13, 11)(8, 15, 14) 2 
Cy yw(1,3, 9, 14)(2, 8, 7, 6)(4, 12, 10, 15) (5, 11) 15 
Cy; wi ty! = (1, 14,9, 3)(2, 6, 7, 8)(4, 15, 10, 12)(5, 11) 15 
CG. = = (1, 13, 9, 3, 14)(2, 12, 15, 7, 5)(4, 11, 10, 6,8) 4 
Cr = (1,5, 4, 13, 7, 11)(2, 8, 9, 15, 10, 14)(3, 12, 6) 10 
Cg =U 8, 13, 12,4, 9, 15, 11,3, 7, 10, 14, 5, 6) 4 
Co = (1,15,6,9,5, 4, 14, 12, 10, 13, 7, 8,3, 2, 11) 4 


Now, we need to find the centraliser of each Class representative as well as the orbit 


of each centraliser that we find. 


CL:=Classes(N); 

for ii in [2..NumberOfClasses(N)] do 

for i in [1..#N] do 

if ArrayP[i] eq CL[ii] [3] then Sch[i]; end if; end for, 
C12:=Centraliser(N,CL[ii] [3]); 

Orbits (C12); 

end for; 


The output we have is given in the following table. 


Table 2.2: Orbits of Centraliser(N,Rep) 


Class Representative Centraliser(N,Rep) Orbits of Centraliser(.V Rep) 
Cy a < (1, 9)(2, 7)(3, 14)(4, 10)(6, 8) (12, 15) > {5, 11, 13}, 
{1,9,3, 12, 14,15, 2, 10, 7,4, 8, 6} 
C3 z < (1,4, 7)(2, 9, 10)(3, 6, 12)(5, 13, 11)(8,15,14) > {1,3,4, 15,6, 5,7, 14, 12, 13,2, 8, 11,9, 10} 
C4 yw < (1,3, 9, 14)(2, 8, 7, 6) (4, 12, 10, 15)(5, 11) > {13}, 
{5,11}, 
{1,3, 9, 14}, 
{2, 8, 7, 6}, 
{4, 12,10, 15} 
Cs wily t < (1, 14, 9,3)(2, 6, 7, 8)(4, 15, 10, 12)(5, 11) > {13}, 
{5,11}, 
{1, 14,9, 3}, 
{2, 6, 7, 8}, 
{4, 15,10, 12} 
Co ye < (1, 13,9, 3, 14)(2, 12, 15,7,5)(4,11,10,6,8)>  {1,13,4,9,11,7,3, 10,5, 14, 6, 2, 8, 12, 15} 
Cr yo < (1,5, 4, 13,7, 11)(@,8,9, 15, 10, 14), 12,6) > {3, 12, 6}, 
{1,13,5,7,4,11}, 
{2, 15,8, 10, 9, 14} 
Cs y < (1,2,8, 13,12, 4,9, 15, 11, 3,7, 10, 14,5, 6) > {1, 2,8, 13, 12, 4,9, 15, 11, 3,7, 10, 14,5, 6} 
Co ye < (1, 15,6, 9,5, 4, 14, 12, 10, 13, 7, 8, 3, 2,11) > {1, 15, 6, 9,5, 4, 14, 12, 10, 13, 7,8, 3, 2, 11} 


Thus we have the following relations 


Table 2.3: Orbits of Centraliser(N,Rep) 


Class Relation 
Co rts c4ty 
C3 ty 
C4 ywts3, ywts, ywts ywte,ywts 
C5 iy hg ye tee ty te yt yea 
Ce yPty 
Cr yxts, yxt, yrto 
Cg yty 
Co yrzty 


Note that t; ~ t, and, since y = (1, 2,8, 13,12, 4,9, 15, 11,3, 7,10, 14,5,6), then 
to ~ t¥ 

ts ~ tv” 

ty~ 

tp~ ty 


away: 


10 


Now we add these relations to our progenitor to obtain homomorphic images of G. 


G=< u,z,y,2Z,t\w*, 2, 23, w 22, w 127 wt, (y, z), wy wt y?, cyt w2yt2, 
t?,(t,wy*), 

(atte), (wte)", (2t)"3, (yet? "4, (ywet?), (ywt)”, (ywtt)"7, (ywt”)"® 
(w-lby-ley? )r9, (wo hy-ley"*)r20, (w! yt)", (w-ly —lyyyrl2, 


g 


(w-lty-1ey” )r13 Gen, (yxtt¥” Pr, (yxt,)" Ae (yxt yy (yi, (gezb Se 


2.3.2 Factoring by Famous Lemma 


We use the Famous Lemma [Cur07] as another method of finding relations. 


Factoring our progenitor by this lemma guarantees the non-collapse of groups. 


Theorem 2.9. /Cur07] Famous Lemma 
Let NN < t,t; >< Cn(Nij), where Ni; denotes the stabilizer in N of the 


two points i and 7. 


Proof. Let w € NN < t;,t; >. We need to show w € Cent(N, N%). 
Let  € NY, 


re =w. 


— 7 l!wr=w. 
— > an —lwr = rw. 
=-_— WT = TW. 


Thus 7 commutes with every element of NY. 


Note that |t;| = |t;| = 2, and |tit;| =n, thus < t;,t; >= Don is Dihedral. 


HE if n is odd. 
Z(Dan) = 


< (tit;)? > if n is even. 
So for each two point stabilizer in N we will compute the centralizer of the two point 
stabilizer in N and then write elements of N in terms of < ¢;,t; > in the following 


way given by the Famous Lemma. 
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(at1)’™ =1 where m is odd and z sends 1 to 2 


(t;t;)" =a where n is even and z fixes both 1 and 2 


Let x = (1,2)(3,5)(4,7)(6, 10)(8, 12)(9, 13)(11, 16)(14, 19)(17, 22)(18, 23) (20, 26) 
(21, 27) (24, 31)(25, 32)(28, 36) (29, 37)(30, 39) (33, 43) (34, 44) (35, 46) (41, 49) (42, 51) 
(45, 55) (47, 57) (48, 59)(50, 62) (52, 64) (53, 65)(54, 67) (56, 69)(58, 72) (60, 71)(61, 74) 
(66, 78) (68, 80)(70, 82)(73, 85) (75, 87)(76, 83) (77, 89) (79, 90) (81, 92) (84, 94) (86, 93) 
(88, 97)(91, 99)(95, 102)(96, 103) (98, 105) (100, 106) (104, 107)(109, 110) and 

y = (1,3, 6)(2, 4, 8)(5, 9, 14) (7, 11, 17)(10, 15, 20) (12, 18, 24)(16, 21, 28) (19, 25, 33) (22, 
29, 38)(23, 30, 40) (26, 34, 45) (27, 35, 39) (31, 41, 50) (32, 42, 52) (36, 47, 58) (37, 48, 60) 
(43, 53, 66) (44, 54, 68)(46, 56, 70) (49, 61, 75) (51, 63, 62)(55, 59, 73)(57, 71, 83) (64, 76, 
88) (65, 77, 80) (67, 79, 91)(69, 81, 78) (72, 84, 95) (74, 86, 96) (82, 93, 100) (85, 90, 92)(87, 
97, 104)(89, 98, 102) (94, 101, 107)(99, 105, 109)(103, 108, 110). 

N=< 0,9 >= gl). 


To find our relations using the Famous Lemma we must first find the Centraliser of 
Nij, where N;; is the stabiliser of the two points 7 and j, which we will say 1 and 2 


respectively. 


S:=Sym(110); 

xx:=S! (1, 2) (3, 5) (4, 7) (6, 10) (8, 12) (9, 13) (11, 16) (14, 19) 
(17, 22) (18, 23) (20,26) (21, 27) (24, 31) (25, 32) (28, 36) (29, 
37) (30, 39) (33, 43) (34, 44) (35,46) (41, 49) (42, 51) (45, 55) 
(47, 57) (48, 59) (50, 62) (52, 64) (53, 65) (54,67) (56, 69) (58, 
72) (60, 71) (61, 74) (66, 78) (68, 80) (70, 82) (73, 85) (75,87) 
(76, 83) (77, 89) (79, 90) (81, 92) (84, 94) (86, 93) (88, 97) (91, 
99) (95,102) (96, 103) (98, 105) (100, 106) (104, 107) (109, 110); 
yy:=S!(1, 3, 6) (2, 4, 8) (5, 9, 14) (7, 11, 17) (10, 15, 20) (12, 


18, 24) (16, 21, 28) (19, 25, 33) (22, 29, 38) (23, 30, 40) (26, 
34, 45) (27, 35, 39) (31, 41, 50) (32, 42, 52) (36, 47, 58) (37, 
48, 60) (43, 53, 66) (44, 54, 68) (46, 56, 70) (49, 61, 75) (51, 
63, 62) (55, 59, 73) (57, 71, 83) (64, 76, 88) (65, 77, 80) (67, 
79, 91) (69, 81, 78) (72, 84, 95) (74, 86, 96) (82, 93, 100) (85, 
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90, 92) (87, 97, 104) (89, 98, 102) (94, 101, 107) (99, 105, 

109) (103, 108, 110); 

N:=sSsub<S|xx,yy>; 

N12:=Stabiliser(N, [1,2]); 

C:=Centraliser(N,N12); 

Set (C); 

{ 

(1, 74) (2, 67) (3, 96) (4, 91) (5, 107) (6, 86) (7, 20) (8, 79) 
(9, 101) (10, 17) (11, 15) (12, 50) (14, 94) (18, 41) (19, 
46) (21, 28) (22, 93) (23, 80) (24, 31) (25, 70) (26, 99) 
(27, 95) (29, 82) (30, 77) (32, 37) (33, 56) (34, 109) (35, 
84) (36, 102) (38, 100) (39, 72) (40, 65) (42, 60) (43, 66) 

44, 75) (45, 105) (47, 98) (48, 52) (49, 68) (51, 85) (54, 

61) (55, 57) (58, 89) (59, 83) (62, 90) (63, 92) (64, 76) 

(69, 78) (71, 73) (87, 110) (97, 108) (103, 104), 


— 


eeeeyy 

(he BY 32 By 4g FV Ce 10S IO Oe Sey 16s Sy Cae, 
SIS. BAVSO;. SEY IOs BI). C24), BT) OSs. 80) ey 36) 
(29, 37) (30, 39) (33, 43) (34, 44) (35, 46) (41, 49) (42, 
51) (45, 55) (47, 57) (48, 59) (50, 62) (52, 64) (53, 65) 
(54,67) (56, 69) (58, 72) (60, 71) (61, 74) (66, 78) (68, 
80) (70, 82) (73, 85) (75, 87) (76, 83) (77, 89) (79, 90) 
(81, 92) (84, 94) (86, 93) (88, 97) (91, 99) (95, 102) (96, 
103) (98, 105) (100, 106) (104, 107) (109, 110), 

(1, 2) (3, 72) (4, 99) (5, 58) (6, 85) (7, 91) (8, 83) (9, 16) (10, 
Tay Cte Tayi) Fe) ay Sy 1. LOD LT, AO ee. 65) 

(19, 29) (21, 80) (22, 51) (23, 102) (25, 46) (27, 68) (28, 
41) (30, 107) (32, 35) (33, 98) (34, 75) (36, 49) (38, 108) 
(39, 104) (40, 63) (43, 105) (44, 87) (45, 69) (47, 78) (48, 
50) (52, 79) (53, 92) (54, 67) (55, 56) (57, 66) (59, 62) 
(60, 86) (61, 74) (64, 90) (65, 81) (70, 94) (71, 93) (77, 
96) (82, 84) (88, 100) (89, 103) (97, 106), 

(1, 67>. 618% 74, -S4y 18, LOT, 203): (4, 26, 6 9)-05,. 96>. 104) 
(6, 17, 93) (7, 91, 26) (8, 50, 90) (9, 13, 101) (10, 
86, 22) (11, 16, 15) (12, 79, 62) (14, 46, 84) (18, 
80, 49) (19, 94, 35) (21, 95, 36) (23, 41, 68) (25, 

87, G2) 407,28, 102) (2%, 33. TOV (30s. 73,0 89)138; 
) ( 
) ( 


66, 69) (34, 75, 110) (38, 100, 106) (39, 77, 58) (40, 
65, 53) (42, 85, 71) (43, 56, 78) (44, 109, 87) (45, 57, 
98) (47, 55, 105) (48, 83, 64) (51, 60, 73) (52, 76, 59) 
(63, 92, 81) (88, 108, 97), 

(3, 58) (4, 91) (5, 72) (6, 73) (7, 99) (8, 76) (9, 11) (10, 85) 
(12, 83) (13, 16) (14, 29) (15, 101) (17, 51) (18, 102) 


~~] 


(19, 37) (20, 26 
35) (27, 80) (28, 
87) (36, 42) 38; 
75) (45, 56) (47, 
(55, 69) (57, 78 
86) (77, 103) (82 
11.0); 
BAY (261) 43). 89) 
Bai on) Ci 
19, 32) (20, 9 
68) (29, 
(38, 97) (40, 
83) (52, 
(58, 96) (63, 
104) (80, 
54) (2, 61) (3, 104 
(10, 93) (12, 90 
68) (19, 84) (20, 
(27,. 36) GS, 
70) (38, 
(44, 110) (45, 4 
83) (55, 98) (56, 
(672 TA (72 77 
67, 61) (2, 74, 54 
Oy 20, its,.-8 
60) (8, 59, 90, 
Tis 22>. Say! BGy 
29, 46, 70) (18, 
2521 4< 23, 36; 
55) (34, 44, 110 
(40, 92, 53, 
Gl 672s. Say T4 
99, 26) (5, 30, 
52, 50, 76, 90, 
65). 29. “Gyre: 
32) (18, 28, 80, 
41, 95, 68, 36, 
109, 75, 87, 11 
65, 63, 53, 92) 
54) (2, 61) (3, 30) 
GO) (15 52) (13, 


— 


65 


94) (30, 


95) (87, 


95) (30, 
106) (39, 


63% 


) (21, 68) 
49) (30, 
108) (39, 
66) (48, 

) (60, 93) 

, 94) (88, 


(S, 
, 99) (13, 
9) (21, 


81) (54, 
) (66, 98) 


) (4, 
p13 5 
O1).( Ty 
58) 
89) (40, 
7) (46, 
66) (57, 
VAGTESy 
(8p Boy 
9, 104, 
76, 50, 
42) (12, 
27, 49, 
68, 95, 
ma ens oe 
65, 81) 
aoe 
96, 


39) (6, 
49) (22, 
103) (33, 
92) (41, 
62) (53, 
109) (88, 


26) (5, 
101) (14, 


94) (48, 


109) (88, 


72, 
52) (9, 


Tove ty 


(22, 42) 
104) (32, 


107) (40, 


62) (50, 
(64, 79) 


106) (89, 


71) (7, 
16) (14, 


61) (55, 
(72, 


102) (23, 
(32, 82) 
53) (41, 


105) (59, 


103, 58, 
96, 


64, 62, 
102, 80, 
41) (24, 


109) (38, 


(43, 
107, 
04, 


45, 
58, 


60) (23, 
110) (3 
4 


45) (34, 


102) (42, 93) (43, 


107) (73, 
106) (100, 


103) (6, 
35) (15, 


76) (50, 


108) (96, 


30) (6, 
16, 


89) (6, 


(23, 95) 
46) (33, 


DI) (524; 
(65, 92) 


26) (8, 
82) (17, 


78) (56, 


108) 


49) (24, 
(33; 78) 
80) (42, 


64) (60, 


107, 


101, 
83,7 719, 
28) (19, 
31): (33; 
97, 
78, 
10:3; 
60, 


98, 


59) (9, 

48, 79, 
102, 49, 
23) (24, 

0, 
(43, 
(4 


57, 


15) (14, 


44) (38, 


, 20) (5, 


By, Sasol 
83, 62, 
27) (19, 
31) (33; 
88, 
56, 98, 
77) (6, 
25) (16, 


70) (22, 73) (23, 
57) (36, 80) (37, 


28) (26, 
84) (38, 


Oy C2, 
88) (39, 


100, 


deg. hOiL, 
64) (14, 
25, 94, 
DD}, 06, 
108, 
78, 45), 
42) (8, 
101) (17, 
41) (29, 
96) (40, 


63) (43, 


96) (97, 


27) (25, 


86) (76, 


22) (7 
16) (1 


79) (51, 


106, 


39) (4, 
hy 
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(245631 42 
105) (34, 
98) (44, 
90) (53, 81) 
(70, 84) (71, 
100) (109, 


Sy 


64) (9, 15) (10, 
85) (18, 36) 
84) (28, 
5, 70) (37, 46) 
7) (48, 90) (50, 
105) (57, 69) 
79) (77, 
, 99) (8, 62) 
7, 86) (18, 
BA) (2D 29) 
(34, 87) (37, 
73) (43, 69) 
71) (52, 
85) (63, 81) 


107), 
TTY (A, 
SL, 
Vly 


26, 99, 

135. Lay 
15) (10, 
32, 84, 

37, 94, 
47, 69, 105, 66, 
108, 100, 88) 
57), 
Tg 205 
boi 93% 
16) (10, 42, 86, 
70, 46, 29, 84, 

Sp Oy OZ) (Ady 
105, 69, 47) (34, 
106, 97) (40, 81, 


935 
aS 
48) (14, 
O27. DOy 


56, 
91, 
51) (8, 


48) (9, 11) (10, 

TL) ALS 2d) CLO 
35) (32, 94) (33, 
81) (43, 55) (44, 
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109) (45, 66) (46, 82) (47, 56) (49, 95) (50, 64) (51, 86) (53, 
63) (58, 104) (59, 79) (62, 76) (65, 92) (67, 74) (68, 102) (69, 
98) (72, 103) (75, 110) (78, 105) (83, 90) (85, 93) (89, 107) 
(97, 100) (106, 108), 

(1, 61, 67) (2, 54, 74) (3, 103, 107) (4, 99, 20) (5, 104, 96) (6, 
93, 17) (7, 26, 91) (8, 90, 50) (9, 101, 13) (10, 22, 86) (11, 
15, 16) (12, 62, 79) (14, 84, 46) (18, 49, 80) (19, 35, 94) 
(21, 36, 95) (23, 68, 41) (25, 82, 37) (27, 102, 28) (29, 70, 
32) (30, 89, 72) (33, 69, 66) (34, 110, 75) (38, 106, 100) 
(39, 58, 77) (40, 53, 65) (42, 71, 85) (43, 78, 56) (44, 87, 
109) (45, 98, 57) (47, 105, 55) (48, 64, 83) (51, 73, 60) (52, 
59, 76) (63, 81, 92) (88, 97, 108) 


} 


Consider the permutation x = (1, 2)(3, 5)(4, 7)(6, 10)(8, 12)(9, 13)(11, 16)(14, 19) (17, 22) 
(18, 23) (20, 26) (21, 27) (24, 31) (25, 32) (28, 36) (29, 37) (30, 39) (33, 43) (34, 44) (35, 46) (41, 
49) (42, 51)(45, 55) (47, 57) (48, 59) (50, 62) (52, 64) (53, 65) (54, 67) (56, 69) (58, 72) (60, 71) 
(61, 74) (66, 78) (68, 80) (70, 82) (73, 85)(75, 87) (76, 83) (77, 89) (79, 90) (81, 92) (84, 94) (86, 
93) (88, 97) (91, 99)(95, 102) (96, 103) (98, 105) (100, 106)(104, 107)(109, 110). Note that 
x sends 1 to 2 and 2 to 1. Therefore, by the Famous Lemma, we have the following 


relation (xt,)™ = 1. Now, since t; ~ t, then we have (xt)™ = 1. 


We have another permutation in C' that also sends 1 to 2 and 2 to 1. We use our 
Schreier System to find this permutation in terms of « and y. Thus, we see that 
yxy txyxyry xyryry = (1, 2)(3, 72)(4, 99)(5, 58) (6, 85) (7, 91)(8, 83) (9, 16) (10, 73) 

(11, 13) (12, 76) (14, 37)(15, 101) (17, 42) (18, 95)(19, 29) (21, 80)(22, 51)(23, 102) (25, 46) 

(27, 68) (28, 41) (30, 107) (32, 35) (33, 98) (34, 75) (36, 49) (38, 108) (39, 104) (40, 63) (43, 105) 
(44, 87)(45, 69) (47, 78) (48, 50) (52, 79) (53, 92) (54, 67) (55, 56) (57, 66) (59, 62) (60, 86) (61, 74) 
(64, 90) (65, 81) (70, 94) (71, 93) (77, 96) (82, 84)(88, 100)(89, 103)(97, 106). Our second 


: leyxyryt)” = 1. 


relation found by the Famous Lemma is (yxy *xryxryry 
Consider our next permutation (3, 58)(4, 91) (5, 72)(6, 73)(7, 99)(8, 76) (9, 11) (10, 85) (12, 83) 
(13, 16)(14, 29) (15, 101)(17, 51)(18, 102) (19, 37) (20, 26)(21, 68) (22, 42) (23, 95) (24, 31) (25, 
35) (27, 80) (28, 49) (30, 104) (32, 46) (33, 105) (34, 87) (36, 41) (38, 108) (39, 107) (40, 63) (43, 98) 
(44, 75)(45, 56) (47, 66) (48, 62) (50, 59) (52, 90) (53, 81) (55, 69) (57, 78) (60, 93) (64, 79) (65, 92) 
(70, 84)(71, 86)(77, 103) (82, 94)(88, 106)(89, 96)(97, 100)(109, 110), which we find by 
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1 1 1 1, 


LYLYLY “LY 
xyxyry ‘xy. Note that t; ~ t and 


tg ~ t”, so our final relation found by the Famous Lemma is (tt”)* = yryxyrylayxryry tay. 


Schrier System is equal to yryxyxry” xy. Now, since yxryxyxy 


1 


LYLYLY — 
fixes 1 and 2, we have that (t,t2)* = yryryry 


We add these relations, as well as some first order relations to our progenitor to 


produce the following isomorphic images. 


Ganges ty eee ay) 3 ergy ay tye) 


?, (t, yeycytaytey*), (t, yeyryrycyxyry ay), 
(tx)*, (tyzytaeyryry! 


(wyt¥*)™*, ((xy)?t)”? >. 


aycyry), AE)" = yaynyay- cycgng: ey, 


Table 2.4; 2°19 --75(11) 
rl r2 k 1 m Order G 
10 5 8 8 11 7920 My 
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Chapter 3 


Extension Problems 


3.1 Preliminaries 


Definition 3.1. /Rot95] Let G be a group such that K < G. K is normal in G if 
gKg"! =K, for everyg € G. We will use K <G to denote K as being normal in G. 


Definition 3.2. /Rot95/ If N<«G, then the cosets of N in G form a group, denoted 
by G/N, of order [G: N]. 


Definition 3.3. /Rot95/ Let G be a group. A normal series G is a sequence of 


subgroups 
G=Go)2G,2°-:-2G,=1 


with Gi41 <1 G;. Furthermore, the factor groups of G are given by G;/Gi41 for 
4=0,1,...,n—1. 


Definition 3.4. /Rot95/ Let G be a group. A composition series of G given by: 
G=Go92G,2°-:-2G,=1 


is a normal series where, for alli, either Gj41 is a maximal normal subgroup of G; 


or Gi41 = G;. 


Definition 3.5. /Rot95/ If group G has a composition series, the factor groups of its 


series are the composition factors of G. 
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Definition 3.6. /Rot95]/ Let G be a group. We say G is a direct product of two 
subgroups H and K if: 


1.H<IG, kK AG; 
2. G=HK; 
3. HANK =1, 
Definition 3.7. /Rot95/ G is a semi-direct product of two subgroups H and K if: 


Pe AGO Ge 
2.G=KQ; 


3. KNQ=1. 


Definition 3.8. /Rot95/ Let G be a group. The center of G, Z(G), is the set of all 


elements in G that commute with all elements of G. 


Definition 3.9. /Rot95/ Let G be a group and H, N <G such that |G| =|N||H|. G 
is a central extension by H if N is the center of G. We denote this by G = N°H. 


Definition 3.10. /Rot95/ Let G be a group and H, N < G such that |G| = |N||H]|. 
G is a mixed extension by H if it is a combination of both central extensions and 


semi-direct products, where N is the normal subgroup of G but not central. We denote 


this byG=N°*: A. 


3.2. Direct Product 


2*20:To(11) 
it?) 1=(yx)3y—1 (ay)2ay~Tay,(yey 1 (ay)try—1t)® * 


Consider the group ( 


G has the following presentation, 


G=< 29,107 yy Laye), (ey), Gayrgay ay “ey 2), 


, (Gjyeyay ey? 


ry ‘ay—'), (t, yryxyxylxyxyry zy), 
(tt?)' = yryryrytryryry ‘zy, (yey eyryryryry't)® >. 
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The compositon series of G is below. 


G= Gi ») 1 where G = (G/G1)(Gi/1) = CoMj1. 


We have C2 by Mj. In order for this to be a direct product we need to have My, 


and C5 normal in G. 


The Normal Lattice of G is 


Order 2 Order 7920 


Wg 


[4] 


Order 15840 


Mh, is of order 7920. We verify that our normal subgroup [3] is in fact Mq1. 


> load ml1l1; 

Loading "/usr/local/MAGMA/libs/pergps/m11" 
Mil —- Mathieu group on 11 letters degree 11 
Order 7 920 = 2°4 « 3°2 *« 5 * 11; Base 1,2,3,4 
Group: G 

> M11:=G; 

> Order (M11); 
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> s:=IsIsomorphic(NL[3],M11); 


Therefore by definition of a direct product we have that G is isomorphic to My x Co. 
To verify this, we will first need to write a presentation for Mj,. We use FPGroup in 


MAGMA to get a presentation for Mj. 


> FPGroup (M11); 
Finitely presented group on 2 generators 
Relations 

$.1°2 = Id(S$) 

$.2°4 = Id($) 


Sal ee IS Ge See BHD ek SE, ae SBD. see Gy Lk SDE 2: ok 
S.1l * $.272 * $.1 * $1272 *« $1.1 * $.2°-1 = Id(S$) 
S HS 2? te ST ROS ED eS ee OSE 2S oe Sel eS e POHL # 
Slows S42! 8 Sd ee GDH) BSD eG. 2 OZ: ee OS OSD oe 
$.1 * $.2°-1 = Id($) 
S & Se 22 & Sve SVQ we SLT e2S 42 a Sel. eS 252: & 
S OS DO ke OS Le OSD RS I eS 2D eS ROG OFT ok 
S.1 * $.2 = Id(S$) 
($.1 * $.27-1)711 = Id($) 

A presentation for My, is K =< 2, y\2?,y*, y "lay -ary-ray2ary?ry?ry |, 


tycyry ‘zy cyxyey’acyry |, cy cy xyry ry ‘ayry? ry ‘ay, (cy!) > 
A presentation for C2 is H =< z|z? >. 


Thus a presentation for G = H x K is < z,2,y|z?, (x, z), (y,2), 


Poy oy ay yey ey ee 


rycyry ‘ty cyryey’cyry |, cy cyxyry ry ‘axyry?ry‘ay, (cy!) > 


We verify that this presentation is isomorphic to 2 x M4. 


> G<x,y,t>:=Group<x,y,t|x°2,y°3, (y°-1*x«*yx*x) 75, (x*y*-1) “11, 
> (yxXxyexXeyexxxy° —Llexxy°-Llexexy°-L*x) 72, 


yw & * yorl * x * y°-l * x * yo-l), 
KX * Yk X * yorl * KX * y * KX * Y * KX * 


yo-l * x * y), (t*t*x)*l=y * x * y * KX * y * xX * y-l * 


X * Yk X * VY kK *& YO-l * KX * y, (y * KX * y°-l * x * y * 


X * VY * KX * VY * KX KY & KX * VY -1let) 76>; 


£,G1,k:=CosetAction (G, sub<G|x,y>); 


> t°2,(t,y * x * 
> (t,y * X * y * 
> 

> 

- 

> #G; 

15840 

> 

> #k1; 

1 


> GG<x,y, z>:=Group<x,y,Z|x°2,y°4, y°-1 * x * y°-2 * x * 


* X * y°2 * KX * y°2 * x * y°-1l,xX * y * x * 
KX * yo-l * KX * y * KX * y°-l * K * VY°2 * x * 
x yo -2 * KX * y°-l * KX * VY kK * VYO-2 * KX 
Ky 2 we xe yoo eK ao ye e yer 1d, 


£,G2,k2:=CosetAction (GG, sub<GG|Id(GG) >); 


> y°-2 * x * y°2 
>y* KX * y-l * 
>y* xX * y°-l,x 

> yr -l* x * y * 

> 2°72, (%,zZ), (y,Z)> 
> #GG; 

15840 

> 

> #k2; 

1 

> s:=IsIsomorphic(G1,G2); 
S; 

> s; 

true 


Therefore, 7 


2*20:Do(11) ~w (2 x M1). 


tt®)t=(yx)3y—1 (ay)2ay~ tay, (yey l(ay)tay-1t)® 


3.3. Semi-Direct Product 


Consider the group 


2*20:(24:S5) 
(a2y2a—ly—1¢e? ype? )3 * 


G has the following presentation, 


Gace yi te, (ay)? yey 
—1,,2,,.-1 ED 
? 


Ce gray 


Plea ge") Gay 


1 1 1 1 


oy aye ye ey 


1 3 


come gr ca 


a =a; i <2) ura 2 2 
(Egg)? ys tara ae a ee Pe 
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The compositon series of G is below. 


Cyclic (2) 


G 
| 
* 
| A(2, 5) = L(3, 9) 
1 


G= Gi =) L. where G = (G/G1)(Gi/1) = D3(5)C9. 


The Normal Lattice of G is 


[1] 


[2] 


Order 372000 


[3] 


Order 744000 


We have a normal subgroup of order 372000. Since L3(5) is of order 372000, we verify 
that NL[2] is isomoprhic to L3(5). 
> s:=IsTsomorphic(NL[2],L_3(5)); 


> S; 
true 


Recall from the previous section, that in order to have a direct product we must have 
C2 as well as £3(5) normal in G. Since our normal subgroup lattice does not show 
a subgroup of order 2, we know that C2 is not normal in G. Thus we cannot have a 


direct product. 
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This extension must be a semi-direct product. We need to find an element of order 


2 that will extend L3(5) to G. To do this, we first must write a presentation for L3(5). 


H<x, y>:=Group<x,y|x°4, 
x°-1l * y°-l * x°-2 * y * x *® y°-l * x°2 * y, 
yorl * x°-1l * y * x°-2 * y*-2 * x7-1 * y°-l * x72 * y*3 x 
x*-1, 
y°rl * x°-2 * y * x*-1l * y * x7-1l * y°-l * x * y*-l * 
Kx°2 * y°2 * x * yl, 
(x * y°-l * x°-1 * y°2)°3, 
Yrag ROK RZ) ae yl) RL ey a RD ey a ke ASL Oe 
y°r2 * x72 * y°-1l * x*-l, 
Vode ROL RO 2 OSL RY OS eR ey Sd RET SD ee BY Se 


VVWVVV VV VV VOY 


K°2 # yO Loe Kw ey? lL «© x -1L>; 

> £,H1,k:=CosetAction (H, sub<H|Id(H)>); 
> s:=IsIsomorphic(NL[2],H1); 

S; 

> Ss; 

true 


Now we find an element of order 2, which we will label C, that will extend L3(5) to 
G. 


for i in NL[3] do if i notin NL[2] and Order(i) eq 2 and 
sub<Gl|i,NL[2]> eq Gl then C:=1; 
break; end if; end for; 


Now that we have this element C, of order 2, we find the action of C on the generators 
of H. 
Below we use MAGMA Schreier System and the following loop, 


> for iin [1..#N1] do if ArrayP[i] eq A*°C then print Sch[i]; 
for|if> end if; end for; 

yY*e X * y°-2 * X * y*-2 * x72 * y°-l * xX * y * xX 

> for iin [1..#N1] do if ArrayP[i] eq B°C then print Sch[i]; 
for|if> end if; end for; 


KX * yo2 * xX°-1l *® yO-l * x*-1l * y°2 * x * y°2 * Kk yY * xX 


So now we know that #9 = yry~?xy~?2?y—! xyz, and y© = xy2a—!y lal y2ry2rye. 
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Now we will add this element of order 2, say z, to our presentation, along with the 


action of this element on the generators of L3(5) to obtain the following presentation. 


G2 =< 2,y, 2|2*,a7!y "2 -yry!22y, ya lye ty 2a ly 22a! 


yee ye a ey ay. eye, 
y 2-2 y 1-1 y Au y 1-1 y 2yy ly K 
ge yee ae ey a a a 


2, x = yxy 2 ry a ryan, y* = gy" x ty tye ly ay? LYL >. 


We then verify that this presentation is isomorphic to G. 


G<x, y, Z>:=Group<x,y,z|x°4, 
RSL ey RL KOR eA eo ke YO RL RKO Zoe yy 
y°rl * x°-1l * y * x°-2 * y*-2 * x7-1 * y°-l * x*2 * y*3 x 


YS OED OR ye aE ST Sey a Le ye Re yO ie 
KID ke VOD eee OSL, 


y°-2 * K°-2 * y°-l * x*-1l * y°-2 * x°2 *« y°-1 * x*-l1 «x 
y°r2 * x72 * y°-1l * x*-l, 
yx X°-1l * y°2 * x°-2 * y°-l * x*-1 *« y*-1 * x°-1 * y°-3 * 


> 

> 

> 

> 

> 

> 

> (x * y°-l * x°-1 * y°2)°3, 
> 

> 

> 

> x72 * yO-l * Kk * y°-l * x*-1,2°2,x°z=y * xX * y°-2 * x * 

> yrr-2 * xX°2 * y°-l * xX * y * X&,y°Z=K * y°2 * x°-1 * y*-l * 
> x°-1l * y°2 * x * y°2 * X * Y * XD; 

> £2,G62,k1:=CosetAction(G, sub<G|Id(G)>); 

> s,t:=IsIsomorphic(G2,G1);s; 


true 


Therefore, clue CEE) &~ (C2 : [3(5)). 


(a2y2a—ly—1¢e? y¢e? 3 


3.4 Central Extension 


2*?0:((Ca:C5) x Sa) 
(a2 yxy3t?®)?,((xy)2t¥)7 ((ay)2t)® ” 


Consider the group 


G has the following presentation, 


G=< x,y,t|G <2,y,t >:= Group < x, y,t\e*, yx *y?a2y, yx by 2ay?, pty bg ey-t 
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1 1 1 1 


x yx* yr ey ay layey, 


oe 3 
Viton yw), Cyeye (y) fegaye (aay OY aay 


ce a ea 


The composition series of G is below. 


CompositionFactors (Gl); 
G 
Cyclic (2) 


Cyclic (2) 


G= Gi 2) ali where G = (G/G1)(Gi/G2)(G2/1) = C2L2(13)C9. 


The normal lattice of G is 
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[2] [3] 


Order 2 Order 1092 


[4] [5] [6] 


Order 2184 Order2184 Order 2184 


ae 


[7] 


Order 4368 


NL|2] is of order 2. We will check to see if this is our center. 


> Center(Gl) eq NL[2]; 
true 


It is possible that we may have a central extension. If there is a larger abelian sub- 


group then we will instead have a mixed extension. 


The following loop will list all of our abelian subgroups. 


> for i in [1..11] do if IsAbelian(NL[i]) then i;end if;end for; 
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We now know that NL/[2], our center, is a maximal abelian subgroup, thus we will 
have a central extension. Now we factor G by our center to form the quotient group 


q, and look at the Composition Factors of q. 


> g, f£:=quo<G1l|NL[2]>,; 
> CompositionFactors (q); 
G 


Cyclic (2) 


It looks like g may be Isomorphic to PGL2(13). 


> s:=IsTsomorphic(q,PGL(2,13));s; 
true 


Thus we will have a central extension of C2 by PGL2(13). 


Now we need to write a presentation for PGL2(13). 


> FPGroup (PGL(2,13)); 
Finitely presented group on 2 generators 
Relations 

62° 3 = TAS) 

($.1°-1 * $.2°*-1)°4 = Id($) 


$,1°12 = Id(8) 

S22 #°S el 4. S,2°51-& SEL 4 & S42 % S172 & S227*S1L « 
$.1*-1 = Id($) 

S.1°2 * $.2 * $.1°4 * $.27+1 * S.1 * $.2 % $.1° +7 + 
$,2°-1 = Id($) 

Sed Hl ee S22 ae Sky ee Se BOSD ee SOB aes SD oe SLOSS 
$,2°-1 = Id($) 


Thus our presentation for PGL2(13) is 

H <a,b >:= Group < a, b|b®, (a—1b—1)4, a!2, bab-1a*ba2b-1a-1, a*ba*b-taba-1d-1, 
as tba Ola oa bs, 

Now we compute the coset action of PGL2(13), which we have labeled as H, and 


check if our presentation is isomorphic to q. 


tVvVVVV VV 


rue 


H<a,b>:=Group<a,b|b°*3, (a~-1 * b°-1)°*4,a°12, 
b* a-x* b*-1l * aW4 * b * av2 * b°-1 * a*-l, 
a°2 * b * a~4 * b°-1 * a * b * a°-1 * b*-l, 
a*-l * b * a*-1 * b*-1 * a73 * b * a°3 * b*-1>; 
f1,H1,k1:=CosetAction (H, sub<H|Id(H)>); 
s,t:=IsIsomorphic(H1,q);s; 
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To write our presentation we need to write the generators of PGL2(13) in terms of 


our center, which we will label c. 


> T:=Transversal (G1,NL[2]); 


> f££(T[2]) eg 
true 
> ££(T[3]) eg 
rue 
A:=T[2]; 
B:=T[3]; 
c:=NL[2].2; 


ae ae EL 
end if; end 
for a2 an [J 
then i; end 
for i in [1 
then i; end 
for i in 
then i; 

end if; end 


VVVVV VV VV NV VV VV VV Ct 
Kh 
e) 
im) 


q.d; 


q.2; 


for; 
«2 
as 
£2. 
Al es 
a2, 


for; 


do if B°3 eq c°i then i; end if; end for; 
do if (A*°-1*B*-1)°*4 eq c°i then i; 


do if A°12 eq c°i then i; end if; end for; 


do if (A°-1*B*-1)°*4 eq c°i then i; 


do if B*xA*B°-1x*A°4xBxA*2*B°-1*A*°-1 eq c7i 


end for; 


do if A*°2*BxA*4*B”—-1*A*B*eA*-1*B°-1 eq c7i 


end for; 
do if A*-1*B*A*-1*B*-1«A* 3x! 


BxA*3*B°-1 eq c7i 


Now we can write a presentation for G by including c, our generator of the center C2, 


and writing PGL2(13) in terms of c. 


HH<c,a,b>:=Group<c,a,b|c°2, (c,a), (c,b),b°3, (a*-1 * b*-1)°4, 
> a°12=c°2,b * a * b°-1 * a°~4 * b * a72 * b°-1 * avé-l, 

> a2 * b * aW4 * b*-1 * a xe b * av°-l1l *« b*-l, 
> a°-1l * b * a*-1 * b°-1 * a73 * Db * a73 * b°-1>; 
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> £2,H2,k2:=CosetAction (HH, sub<HH|Id(HH)>); 
> s:=IsIsomorphic(H2,G1); 


Se 
true 


Thus G = C$PGL2(13) 


3.5 Mixed Extension 


2*20:T9(11) 


Consider the group Cer) (y8t007 92 


G has the following presentation, 


G=< x,y, t\e?, (y!a)?, y, 2, (t, cy), (wt), (yt)? >. 


The composition series of G is below. 


CompositionFactors (G1); 
G 
Cyclic (2) 
Al, 13) = L(2, 19) 


Cyclic (3) 


Cyclic (2) 


G = G, D G2 D G3 D 1, where G = (G/G1)(Gi/G2)(G2/G3)(G@3/1) = CoL2(19)C3C2. 


The Normal Lattice of G is 
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[1] 


JP 


[3] [2] [5] 


Order 3 Order 2 Order 3420 


D>O 


[4] [7] [6] 


Order6 Order10260 Order 6840 


[8] [9] [10] 
Order 20520 Order 20520 Order 20520 


[11] 
Order 41040 


NL|2] is of order 2. We will check to see if this is our center. 


> Center(Gl) eq NL[2]; 
true 


It is possible that we may have a central extension. If there is a larger abelian sub- 


group then we will instead have a mixed extension. 


The following loop will list all of our abelian subgroups. 


> for iin [1..11] do if IsAbelian(NL[i]) then i; 
> end if;end for; 

1 

2 


30 


We now know that NJZ/[2], our center, is not a maximal abelian subgroup. NL[4], 
which is of order 6, is our maximal abelian subgroup. Below we confirm that C¢ is 


the isomorphism type of NL[4]. 


> X:=AbelianGroup (GrpPerm, [6]); 
> s:=IsIsomorphic(X,NL[4]);s; 
true 


We will have a mixed extension of NL[|4] by q where q is the isomorphic image of 
G/G2 = G/NL|4]. Now we need to look at the normal lattice and composition factors 


of q to solve its isomorphism type. 


> gq, ££:=quo<G1|NL[4]>; 
> nl:=NormalLattice(q) ; 
> nds 


Normal subgroup lattice 


[3] Order 6840 Length 1 Maximal Subgroups: 2 


[2] Order 3420 Length 1 Maximal Subgroups: 1 


[1] Order 1 Length 1 Maximal Subgroups: 


> CompositionFactors (qd); 


Cyclic (2) 


A(1, 19) = L(2, 19) 


rP— + —Q 


By looking at the composition series of qg, it seems that our extension problem of q 


may be PGL(2, 19). 
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> s:=IsIsomorphic(q,PGL(2,19)); 


> Ss; 
true 


So now that we know that q is isomorphic to PGL(2,19), we need to find a presen- 


tation for q. 


> FPGroup (q) ; 


Finitely presented group on 3 generators 


Relations 
$.1°2 = Id($) 
$.3°2 = Tas) 
($.2°-1 * $.1)72 = Id($) 
($.2 * $.3 * $.2°-1 * $.3 * $.2)72 = Id(S$) 
($.2 * $.3 * $.27-1 * $.3 * $.2°-1 * $.3)°2 = Id(S$) 
(S.1 * $.3 * $.2 * $.3 * $.2°-1 * $.3)°2 = Id(S$) 
$.2°8 x S.1 * $.3 * $.27-1 * $.3 *« $1.2 * $.3 = Id(S$) 
Sil Ke SBR SS. Re Si Be S24, oe SEB ROS 2S Hk Se Se 
§$.2°-2 * $.3 = Id(S) 


H<x, y, 2>:=Group<x,y,Z|xX°2,2°2, (y°-1*x) “2, 


moe 


S; 


> 

> (yxz*xy°-lezxy) °2, (y*xz*xy°>-l*ezxy°-1*z) 

> (X*Z*Y*ZRY -1*Z) 72, Vy 8xxeZey -LeZey*Z, 
> KXKZKKKZRKY 4xZKY  -LAZKY° -2*Z>; 

> f1,H1,k1:=CosetAction(H, sub<H|Id(H)>); 
> s,t:=IsIsomorphic(H1,q); 

true 


Now our next step is to write the generators of H into elements of g. In order to do 


this we will need to look at the transversals of NL[4]. 


> T:=Transversal (G1,NL[4]); 


> #7; 
6840 
Ses 


Note that T/[2] will give us a permutation that we will have to store in MAGMA. We 


will store this permutation as A. Similarily we will store the permutation for T[3] as 
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B and the permutation for T/4] as C. 


> f£(A) eq q.1; 


> ££(B) eq q.2; 
true 
> ££(C) eq g.3; 
true 


We want to look at our presentation of H to see which elements have changed by the 


action of q. 


1 1 1 


Zur eeu eye; 


Hee tay zee iy a) en eoy ey” ey 2) (age 


vzuzy* zy ‘ zy 2z > 


Our first relation in the presentation, x? tells us that x? = e, therefore the order 


of x is 2. We want to see what the order of x is when we apply the action of q. 


> Order (A); 


So we see that a does not change. We will check the rest of the relations in our 


presentation and look for any changes. 


Order (C); 
Order (B*~-1+A); 


Order (B*C*B*-1*Cx*B*-1«C); 


Order (Ax*xC*B*xC*xB°-1x«C); 


Order (B* 8xA*xC*B°-1*CxBxC) ; 


VrRFVNYNVNVNY VN V 


Order (AxC*xA*C*B* 4*C*B*-1*C*xB*-2«C); 
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The order of our last relation has changed. We will need to write this relation in 


terms of q. 


We will need to find a generator of NL|4]. Note that NL/4], of order 6, is cyclic. So 
if we obtain an element of order 6 then this element will generate the whole group. 


We will name this element of order 6, D. 


> IsCyclic(NL[4]); 
true 

> Order (NL[4].1); 
6 

> D:=NL[4].1; 


Now we go back to our relation that has changed and write this relation in terms of D. 


> AxCxA*xC*xB*4*«C*B*-1*C*xB°-2*C eq D; 
false 

> AxC*xA*C*xB°4*xC*B*-1*CxB°-2*C eq D°2; 
false 

> AxCxA*C*xB*4*«C*B*-1*CxB°-2*C eq D3; 
false 

> AxC*xA*x*C*xB*4*«C*x*B*-1*CxB°-2*C eq D°4; 
false 

> AxCxA*C*xB*4*«C*B*-1*CxB°-2*C eq D°5; 
ELUS 


MAGMA tells us that this relation is equal to D®. 


Next we need to check to see if D commutes with x,y, or z. 


> for iin [0..6] do if D°A eq D7i 
for|if> then i; break; end if; end for; 
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The above loop confirms that D® = D?. 


> for iin [0..6] do if D°B eg D7i 
for|if> then i; break; end if; end for; 


> for iin [0..6] do if D°C eg D7i 
for|if> then i; break; end if; end for; 


We have confirmed that DY = D® and D? = D°. We can now write a presentation 


for H, where w will be our element of order 6, and check to see if H is isomorphic to G. 


> H<w,xX,y,z>:=Group<w,x,y,Z|w 6,x°2,2°2, (y°-1*x) “2, 
> (yxz*xy°-lezxy) “2, (y*xz*xy°>-l*ezxy°-1*z) 72, 
> (X*Z*Y*ZRY -1*Z) 72, yy 8xxeZKy  -LkZey*Z, 
> K*ZKKKZKY AxzZxy°-Llezxy°-2*z=w'5, 

wo x=w"5, 

w°y=w'5, 

Ww z=w"5>; 

#H; 

1040 

> #G1; 

1040 

> £,h,k:=CosetAction (H, sub<H|Id(H)>); 

> #h; 

1040 

> #G1; 

1040 

> s:=IsIsomorphic(h,Gl); 

S63 

true 


VVV NV 


_ __-2*79:T0(11) ow pe. 
Therefore G = Ten ™S See) 6° : PGL(2, 19). 
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Chapter 4 


Monomial Progenitors 


4.1 Preliminaries 


Definition 4.1. /Cur07/ A monomial representation of a group G is a homomor- 
phism from G into GL(n, F), the group of nonsingular n x n matrices over the field 


F, in which the image of every element of G is a monomial matrix over F. 


Definition 4.2. /?/ (Monomial Character) Let G be a finite group and H < G. 


The character X of G is monomial if X = \%, where X is a linear character of H. 


Definition 4.3. /?] A matrix in which there is precisely one non-zero term in each 


row and in each column is said to be monomial. 


Definition 4.4. /?/ Let A(x) = (aij(a)) be a matrix representation of G of degree m. 


We consider the characteristic polynomial of A(x), namely 


A= ay1(x) —ay2(x) we —A1m (2) 
ISAO NK —az1 (x) A — a22(L) ... —Aam(zx) 
—Ami(Z) = —Am2(x) «A Amm(2) 


This is a polynomial of degree m in A, and inspection shows that the coefficient of 


—\™—! is equal to 
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@(x) = ay(x) + ag2(x) +... + Qmm(2). 


It is customary to call the right-hand side of this equation the trace of A(x), abbre- 
viated to trA(ax), so that 


(xz) =trA(z). 
Definition 4.5. /?/ The sum of squares of the degrees of the distinct irreducible 
characters of G is equal to |G|. The degree of a character y is (1). Note that a 


character whose degree is 1 is called a linear character. 


Definition 4.6. /Isa76/ Let H < G and ¢(u) be a charcter of H and define $(x) = 0 
if x © H, then 


is an induced character of G. 


Definition 4.7. Formula for Induced Character 


[Isa76] Let G be a finite group and H be a subgroup such that |G : H| = 
TAL =” Let Ca, a = 1,2,...,m be the conjugacy classes of G with |Ca| = ha, 
a=1,2,...,m. Let ¢ be a character of H and ¢@ be the character of G induced from 
the character ¢ of H up to G. The values of ¢% on the m classes of G are given by: 


¢=— DY ow), a=1,2,3,..,m. 


a 


weCaNnH 


4.2 Monomial Progenitor 11**:,,(4 : 5) 


Consider 11*4:,,(4:5). G = (4:5) is given by 
G = (4:5) =< 2,y|2*7, cy42y?, yx? yx >, where 
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x = (1,4,17, 15)(2, 3, 18, 16)(5, 12, 14, 7)(6, 11, 13, 8)(9, 19, 10, 20), and 
= (1,6, 10, 14, 18)(2, 5, 9, 13, 17)(3, 8, 12, 15, 19) (4, 7, 11, 16, 20). 


G = (C4: Cs) has monomial irreducible representation in dimension 5. We will write 


a progenitor for 11*4:,(C4 : Cs). Since a 5 if 5 => |H| = 4, we need to 
find a subgroup H of order 4 and induce a linear character of H up to G to obtain 


the irreducible character of degree 5 of G. 


The conjugacy classes of group (C4: Cs) are given in the table below. 


Table 4.1: Conjugacy Classes of (C4 : Cs) 


Class Representative of the class # of elements in the class 
1 


a? = (1,17)(2, 18) (3, 16)(4, 15)(5, 14) (6, 13)(7, 12)(8, 11)(9, 10)(19, 20) 5 
Cy t= (1,4, 17, 15)(2, 3, 18, 16) (5, 12, 14, 7)(6, 11, 13, 8)(9, 19, 10, 20) 5 
x3 = (1,15, 17,4)(2, 16, 18, 3)(5, 7, 14, 12)(6, 8, 13, 11)(9, 20, 10, 19) 5 
y = (1,6, 10, 14, 18)(2,5, 9, 13, 17)(3, 8, 12, 15, 19)(4, 7, 11, 16, 20) 4 


Consider the subgroup H = Zs of G given below. 

H = {e, (1, 18, 14, 10, 6)(2, 17, 13, 9, 5)(3, 19, 15, 12, 8)(4, 20, 16, 11, 7), (1, 14, 6, 18, 10) 
(2,13, 5,17, 9)(3, 15, 8, 19, 12)(4, 16, 7, 20, 11), (1, 10, 18, 6, 14) (2, 9, 17, 5, 13) (3, 12, 19, 8, 15) 
(4, 11, 20, 7, 16), (1,6, 10, 14, 18)(2, 5, 9, 13, 17)(3, 8, 12, 15, 19)(4, 7, 11, 16, 20)}. The con- 


jugacy classes of Zs are given in the table below. 


Table 4.2: Conjugacy Classes of H = Zs 


Class Representative of the class # of elements in the class 
D, e 1 
Dy y* = (1,18, 14, 10, 6)(2, 17, 13, 9, 5)(3, 19, 15, 12, 8)(4, 20, 16, 11, 7) 1 
D3 v = (1,14, 6, 18, 10)(2, 13, 5,17, ee 8, 19, 12)(4, 16, 7, 20, 11) 1 
Dz y? = (1,10, 18,6, 14) (2, 9, 17, 5, 13)(3, 12, 19, 8, 15)(4, 11, 20, 7, 16) 1 
Ds —-y = (1,6, 10, 14, 18) (2, 5, 9, 18, 17)(3, 8, 12, 15, 19)(4, 7, 11, 16, 20) fl 


Consider the irreducible characters ¢ (of H) and x (of G) given below. 


Table 4.4: Character Table of G = (C4 : Cs) 


Table 4.3: Character Table of H = Z5 


Class Di Do Dz D4 Ds 
Size 1 b W thr 

Order 1 5 5 5 
| 1 kf 14 
d2 1 Ze GP He Ge 
Gar. IN Ze “Be ee Ze 
Or Rh. e.g. ae oe 
Oe De Oe ge FF oe 


where Z is the 5th root of unity. 


Class Cy C2 C3 C4 Cs 
Size 1 5 5 5 64 
Order 1 2 4 4 5 
X1 1 1 1 1 1 
x2 1 1 -l -l 1 
x3 1 -l -I I 1 
KA 1 -l I -I 1 
er ad. AO? Ooo OY 21 


where J is the 4th root of unity. 
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Next we must find a non-trivial linear character of H to induce up to G. Note that 


each character of H is linear since they all have degree 1. We will induce x2 up to G. 


Now, G= He U Hx U H2? U Hx? 


Let ty 


Then 


€, to 


x, t3 


x?, andta=2 


3 
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Similarily, 


b(xy(x?)~") 
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dy) (yx?) = dyn?) bya) 

_ | o(zy) oy’) d(xyx”) (aya) 
o(a?y) d(a?ya?) o(y*) (aya) 
wer dla? ya?) p(x? yx?) o(y?) | 
z 0 0 0 
_| 9 z7 0 0 
0 0 2 0 
MG 0 0 2 


Now, z is the 5th root of unity. To find the value of z we must find the smallest 
possible field that has a fifth root of unity. We look for the smallest prime p such 
that 5|p — 1. Therefore p = 11. 

Now 2 is a primitive root of 11 ; that is, Order(2) = #(11— 1) = 10 sOrder(2) = 10. 
It follows that Order(2?) = 5, because if Order(a) = n and d is a positive divisor of 


n, then 
Order(aa) =d 
Or generally, 
Order(a) 
Order(a*) = 
Beene gcd(d, Order(a)) 
Hence, |4| = 5. 


Now the elements of order 5 in Z1; are 4,47 =; 5, 4° =); 9, and 44 =); 3. We will 
choose z = 3. 

Then we have 

Spe Bag = 9 


Pag 22 =3-9= 2725 2= 2-22 =9-9=81=14 


Al 


Thus, 
eae 
O59 20: 20 
A(yy) = 
03 0 
005 


We verify these matrices by running the following loop. 


> C:=CyclotomicField(5); 

> GG:=GL(4,C); 

> T:=Transversal (G,H); 

> #T; 

4 

> =[[C.1,0,0,0)] < 2 in [1..4]]; 

> for i,j in [1..4] do A[i 5): =0; end for; 

> GG:=GL(4,C); 

> for i,j in [1..4] do if T[i]*xx*T[j]°-1l in H then 


for|if> Ali, j]:=CH[2] (T[i] «*xx*T[j]°-1); 
for|if> end if; end for; 
> B= iC 04 0, OD oP Se ane Ek. 43 


> £or.a, 7) an -4] do B[i,j]:=0; end for; 
2 LOI ahs], ar | -4] do if Tli]*yy*T[j]°-1l in H then 
for|if> Bl[i,j]:=CH[2] (T[i]*yy*T[j]°-1); 


for|if> end if; end for; 
> HH:=sub<GG|A,B>; 

> #HH, #G; 

20 20 


> GG!I 
-zeta_5°3 - zeta_5°2 - zeta_5 - 10 0 QO] 
0 zeta_5*2 0 0] 

0 0 zeta_5 0] 

0 0 0 zeta_5*3] 


The order of A(x) is 4 and the order of A(y) is 5. Also, the order of A(x)A(y) 
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is 4. Thus, < A(x), A(y) > is a faithful representation of G = (C4 : Cs), since 
|z| = 4 = |A(z)|, ly| = 5 = A(y), and |xy| = |A(x)A(y)| = 4. 


Now we must convert these matrices into permutations. 


ay Hath ts where a;; stands for the ith row and jth column of the matrix. 


i 10 a] 
101 0 
Then for A(z) = | |. we have 
1110 
le 0 0 " 
ag = 1S - to, 
a93 = 1 => to > fs, 
aza = 1 = > 13 > ta, 


Ce a i 


We have 4 t’s since [G : H] = 4, and our ?’s are of order 11 since Z1, is the smallest 


finite field that has 5th roots of unity. 


Therefore, our permutation representation of A(z) is 


x = (1,2,3,4)(5, 6,7, 8)(9, 10, 11, 12)(13, 14, 15, 16)(17, 18, 19, 20) 
(21, 22, 23, 24)(25, 26, 27, 28) (29, 30, 31, 32)(33, 34, 35, 36) (37, 38, 39, 40). 


|! 0 0 3] 
etre 09 0 0 
Similarily, for A(y) = | |. we have 
00 3 0 
a 0 0 ‘| 
ay =4=5 4 > tH, 
a22 =9 => te > 2B, 
a33 = 3 => ts > 88, 
ie bt} 
1 2 8 4 5 6 7-8-9 10 11 12 18 14 15. 16 
i Bk eee ee ee a 
4+ + +t bt b+ bt tt bbb dd 
tbe 8 ER. A a RS A tee ee SE Sa OE a Spa 
13. 34 11-20. 29-96. “23. 40) TTB: 35° 16. AT 10" 38. 36 
17 18° 49°20 91 “92:23 94" 95. 26-27 28 29-30 
ts it) de. te ke de, GO ee eee ey a 
+ + +dt db db + bt bt bt st dt 
a ee Sa Sm a a 2 a 8 
BB 25 4 1? 6 88 OT Be: Ot B09 8 Br 8 
31-32. 83°84. °35. 36 “87 BB: . 39" 40 
Cae ay Se a a eee ae 
sr rr a a a a 
te, xt thin te Ea a 
7 28 9 14 19 4 2 6 31 24 


Therefore, our permutation representation of A(y) is 
y = (1, 18, 17, 33, 9) (5, 29, 37, 25, 21)(6, 26, 30, 22, 38) (2, 34, 14, 10, 18) 
(3, 11, 35, 19, 15) (4, 20, 12, 16, 36) (7, 23, 27, 39, 31) (8, 40, 24, 32, 28) 


A presentation for (4: 5) is < 2, y|x*, ry*a3y3, yx? yr >. 
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Thus, by definition, our presentation of the monomial progenitor 11**:,,(4 : 5) will be 


<2,y,2,t\24, cytz%y?, yar ya, t™, Normaliser(N,<t >) > 


Since our t’s are of order 11, we will have t™ = t"'. 

Now we must find the Normaliser(N,< t >), that is, the permutations that sta- 
bilize all the powers of t1, {1,5,9,13,17,21,25,29,33,37}. 

Let t ~ 4. 

We then find these permutations. 


> Normaliser:=Stabiliser (N, {1,5,9,13,17,21,25,29,33,37}); 
> Generators (Normaliser); 


{ 
(Teds Ty 334% 2925 34, 04, LO; 18) (35 LL Soy. 19,- 25) 
(4; 205 12,- 16; 36) Coy 29) 377 25; 21)-(0,: 207 30% 22%. 33) 
(7p 237 27, 39, 31)-(8; 40, 24, 327 28) 


Therefore, Normaliser(N, < t, >) =< (1, 18,17, 33, 9)(2, 34, 14, 10, 18)(3, 11, 35, 19, 15) 
(4, 20, 12, 16, 36)(5, 29, 37, 25, 21)(6, 26, 30, 22, 38)(7, 23, 27, 39, 31)(8, 40, 24, 32, 28) >. 
Since y = (1,13, 17,33, 9)(2, 34, 14, 10, 18)(3, 11, 35, 19, 15)(4, 20, 12, 16, 36) 


(5, 29, 37, 25, 21)(6, 26, 30, 22, 38)(7, 23, 27, 39, 31) (8, 40, 24, 32, 28), and 


y sends t; to te we have that t¥ = t*. 


Thus, the presentation of the monomial progenitor is given by 


11*4 (4:5) =< 2, y, t+, cyte? y?, yea? ya, t,t = t* >. 


Next we add the following first order relations to our progenitor to find finite homo- 


morphic images. 


(a?4¥")®, (25t)®, (yt?)®, (atv) 
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> G<x,y,t>:=Group<x,y,t|x°4,x*y°4*x°3x*y°3, 
> y°3*«x > 3xy*x,t°1l,t°y=t°4, (x7 2*t* (y73)) 73, (x7 3«t) 78, 
(y*t*x) *5, 

(x*t* (y"4)) °3>; 

#G; 
920 

/x* 

7920 

x / 

S:=Sym(40); 
xx:=S!(1,2,3,4) (5,6,7,8) (9,10,11,12) (13,14,15,16) 
(17,18,19,20) (21,22,23,24) (25,26,27,28) 

(29, 30,31,32) (33,34, 35,36) (37,38,39,40); 

Vy t=S0(1,135.177 33,79) (97 293 37 25721) 

(6,26, 30,22, 38) (2,34,14,10,18) (3,11,35,19,15) 
(4,20,12,16, 36) 

(05 23.277397.31) (87-40, 24;.3 2:28) 7 

N:=sSsub<S|xx, yy>; 
£,G1,k:=CosetAction (G, sub<G|x,y>); 

#k; 


Vv 


VrRFVV VV VV VV VV VV VV NIV OV 


CompositionFactors (Gl); 
G 
| M11 
1 


Manual Double Coset enumeration will follow in a later chapter. 


4.3. Monomial Progenitor 11*?:,,, Dio 


Consider 11*? :, Dig. G = Dio is given by 
G = Dig =< 2, y|x"®, y*, (xy)? >, where 
x = (1,4,6,8, 10, 12, 14, 16, 18, 19)(2,3,5,7,9, 11, 13, 15,17, 20), and 
y = (1, 15)(2, 16)(3, 14)(4, 13)(5, 12)(6, 11)(7, 10)(8, 9)(17, 19)(18, 20). 


G = Dip has monomial irreducible representation in dimension 2. We will write a 


progenitor for 11*!:,, Dig. Since a 2 a 2 => |H| = 10, we need to find 


a subgroup H of order 10 and induce a linear character of H up to G to obtain the 


irreducible character of degree 2 of G. 
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The conjugacy classes of group Djg are given in the table below. 


Table 4.5: Conjugacy Classes of D109 


Class Representative of the class # of elements in the class 
Cl e€ 1 
Cz (1, 12)(2,11)(3, 13) (4, 14)(5, 15)(6, 16)(7, 17)(8, 18) (9, 20)(10, 19) 1 
C3 (1, 15)(2, 16)(3, 14)(4, 13)(5, 12)(6, 11)(7, 10)(8, 9) (17, 19) (18, 20) 5 
C4 1, 13) (2, 14)(3, 12)(4, 11) (5, 10)(6, 9)(7, 8)(15, 19) (16, 20) (17, 18) 5 
Cs (1,6, 10, 14, 18)(2, 5, 9, 13, 17)(3, 7, 11, 15, 20)(4, 8, 12, 16, 19) 2 
Cg (1, 10, 18, 6, 14)(2, 9, 17, 5, 13)(3, 11, 20, 7, 15)(4, 12, 19, 8, 16) 2 
Cz 1,4, 6,8, 10, 12, 14, 16, 18, 19)(2, 3, 5, 7,9, 11, 13, 15, 17, 20) 2 
Cg 1,8, 14,19, 6,12, 18,4, 10, 16)(2, 7, 13, 20,5, 11,17, 3,9, 15) 2 


Consider the subgroup H = Zo of G given below. 
H = {e,(1,12)(2, 11)(3, 13)(4, 14)(5, 15)(6, 16)(7, 17)(8, 18) (9, 20)(10, 19), (1, 6, 10, 14, 
18) (2,5, 9, 13, 17)(3, 7, 11, 15, 20) (4, 8, 12, 16, 19), (1, 10, 18, 6, 14)(2, 9, 17, 5, 13)(3, 11, 
20, 7, 15)(4, 12, 19, 8, 16), (1, 18, 14, 10, 6)(2, 17, 13, 9, 5)(3, 20, 15, 11, 7)(4, 19, 16, 

12,8), (1,19, 18, 16, 14, 12, 10, 8, 6, 4) (2, 20, 17, 15, 13, 11, 9,7, 5, 3), (1,4, 6, 8, 10, 12, 

14, 16, 18, 19)(2, 3,5, 7,9, 11, 13, 15, 17, 20), (1,8, 14, 19, 6, 12, 18, 4, 10, 16)(2, 7, 13, 

20, 5, 11,17, 3, 9, 15), (1, 16, 10, 4, 18, 12, 6, 19, 14, 8)(2, 15, 9, 3, 17, 11,5, 20, 13, 7), 

(1, 14, 6, 18, 10)(2, 13, 5, 17, 9)(3, 15, 7, 20, 11)(4, 16, 8, 19, 12)}. 


The conjugacy classes of Z19 are given in the table below. 


Table 4.6: Conjugacy Classes of H = Zj9 


Class Representative of the class # of elements in the class 
D, e il 
Dz (1,12)(2, 11)(3, 13)(4, 14)(5, 15) (6, 16)(7, 17)(8, 18)(9, 20)(10, 19) 1 
D3 (1,6, 10, 14, 18)(2,5, 9, 13, 17)(3, 7, 11, 15, 20) (4, 8, 12, 16, 19) 1 
Ds (1,10, 18,6, 14)(2, 9, 17, 5 18), 11, 20,7, 15)(4 12, 19, 8, 16) i 
Ds, (1,14,6, 18, 10)(2, 13, 5, 17, 9)(3, 15, 7, 20, 11)(4, 16, 8, 19, 12) 1 
De (1,18, 14, 10, 6)(2, 17, ee 9,5)(3, 20, 15, 11, 7)(4, 19, 16, 12, 8) 1 
Dr (1,4,6,8,10, 12, 14, 16, 18, 19)(2, 3, 5, 7,9, 11, 13, 15, 17, 20) 1 
Ds (1,8, 14,19, 6, 12, 18, 4, 10, 16)(2, 7, 13, 20, 5, 11, 17, 3, 9, 15) 1 
Dy (1,16, 10,4, 18, 12, 6, 19, 14, 8)(2, 15, 9, 3, 17, 11, 5, 20, 13, 7) 1 
Dy (1,19, 18, 16, 14, 12, 10, 8, 6, 4) (2, 20, 17, 15, 13, 11, 9, 7,5, 3) 1 


Consider the irreducible characters ¢ (of H) and x (of G) given below. 


Table 4.7: Character Table of H = 219 


Class Di Dog Dz D4 Ds De Dz Dg Do Dio 
Size 1 Li) on “ae “a 1 1 i! 1 
Order 1 2 3h 5. ob. 5 10 10 10 10 
dy 1 SS ns a if 1 1 1 
dg 1 ee ee oe = |, =A i 
¢3 1 Ly 4. ge: 2 oe oe Ce Z Ze 
da 1 i. Bs Be ea! Ze Z he 
és 1 Ths ee OP Ze YS ~Ge 
de 1 af. ee ae ee vA Zo. a 
é7 1 ike <> SG ee GE eS Zz. 
dg 1 A TP. 2. ee, Ge ae ee Zz 
do 1 ie Qe 1k Oe. ee oe We Te ae 
dio 1 a. Se ge oe Ze Zz Ze ta 
where Z is the 5th root of unity. 
Table 4.8: Character Table of G = Dio 

Class Ci Co C3 C4 Cs C6 Cr Cx 

Size 1 De ain “Br BO? 2 2 

Order 1 2 2 2 5 5 10 10 

x1 21 ty th ie ie 1 1 

x2 21 i> edie vai. 0, tL: 1 1 

7 ee) ee Cee) eS a | =| 

va. ek St gh Ge a ot -1 

Ye “2 22 ) O Be soe aye - ay 

Ver 2° 01, 30 “Br age OZ Zz 

Ver 39 2, 0 OF: ee me & we 

Nee 7 ee A oP ee ee 


where Z is the 5th root of unity. 


AT 


Next we must find a non-trivial linear character of H to induce up to G. Note that 
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each character of H is linear since they all have degree 1. We will induce x4 up to G. 


> CH[4]; 

¢ 2, =1, zeta (5). 5,. zetai(s). 5° 2, zeta(5) 5" 3, 
-zeta(5)_5°3 - zeta(5)_5°2 - zeta(5)_5 - 1, 
—zeta(S).-5° 3, zeta(s) 573 + zeta(s) 5° 2 
zeta(5)5 + 1, -zeta(5)_5, -zeta(5)_5°2.) 


We will use a loop to find the two induced representations A(x) and A(y) of degree 
on = 7H = 2. First we must input the values of z, z”, z°, 24, --z, —z?, -—z3, and —z4 
into our loop, which we will denote as C.1, C.2, C.3, C.4, -C, -C.1, -C.2, -C.3, and 


-C.4, respectively. 


Now, z is the 5th root of unity. To find the value of z we must find the smallest 
possible field that has a fifth root of unity. We look for the smallest prime p such 
that 5|(p — 1). Therefore p = 11. Now, 2 is a primitive root of 11 ; that is, 

Order(2) = (11 — 1) = 10 sOrder(2) = 10. It follows that Order(2?) = 5, because 


if Order(a) = n and d is a positive divisor of n, then 


Or generally, 


Order(a) 
Order(a*) = 
meee gcd(d, Order(a)) 


Hence, |4| = 5. 
Now the elements of order 5 in Z1; are 4,4? =; 5, 4° =; 9 , and 44 =1; 3. We will 


choose z = 4. Then we have, 


v=z-2=4-4=16=115 
eaoz-22=4-16=64=),9 
eA = 22-72 = 16-16 = 256 =]; 3. 


Also, z2*+ 22 +2%+2+1=0 


= 24842 41=-2 


—> 3494+5+1=-2 


=> 18 =) 7=-z. 


Similarily, 24 +2? +27+2z+1=0 


= f4+4241=-2 
=> 34+94441=-27 


= 17 =11 6 = ee 


zt 734272 4+2724+1=0 


= 242724741 =-23 


3 Aa ee? S318 Sp PS and 


44727 42741=0 


= P4+r4+24+1=-24 
=> 94+54+44+1=-21 


=> 19=1,8 = —-2"*. 


> C:=CyclotomicField(5); 


> N:=H; 
> T:=Transversal (G,H); 
> GG:=GL(2,11); 


Vv 
3 


Fh FH FH FH Fh FH EF SF SFE FH SF Ss iF 


GG GG GG GG GG GG 


4 


at := function(n,p,D,k) 
ction> for i,j in [1 
ction|for|if> iff CH 
ction|for|/if> then 
GtLon tor | at>- at: CH 
ction|for|/if> then 
ctten| for |ti> 2 CH 
ction|for|/if> then 
ction|for|if> if CH 
ction|for|/if> then 
ction|for|if> iff CH 
ction|for|if> then 
ction|for|if> if CH 


[j]°-1 in H then 
eq C.] 

eq -C.1 

eq C.l°2 

eq =-C.1°2 

eq C.1°3 

eq °C «l*3 
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function|for|if> then D[i,j]:=2; end if; 
function|for|if> if CH[n] (T[i]*p*T[j]°-1) eq Cc.1°4 
function|for|if> then D[i,j]:=3; end if; 
function|for|if> if CH[n] (T[i]*xp*T[j]*-1) eq -Cc.17°4 
function|for|if> then D[i,j]:=8; end if; 
function|for|if> if CH[n] (T[i]*p*T[j]*-1) eq l 
function|for|if> then D[i,j]:=1; end if; 
function|for|if> if CH[n] (T[i]J*p*T[j3]*-1) eq -1l 
function|for|if> then D[i,j]:=-1; end if; 
function|for|if> if CH[n] (T[i]*p*T[j]°-1) in {1,-1} 
function|for|if> then D[i, j]:=CH[n] (T[i]*p*T[j]°-1); end if; 
function|for|if> end if; end for; 
function> return D; 
function> end function; 
> A:=[[0,0]: i in [1..2]]; 
> mat (4,xx,A,2); 

[ 2, 0], 

[ 0, 6 ] 


’ 


> mat (4,yy,A,2); 


The order of A(x) is 10 and the order of A(y) is 2. Also, the order of A(x) - A(y) is 2. 
Thus, < A(x), A(y) > is a faithful representation of G = Dj, since |x| = 10 = |A(a)], 
ly] = 2 = A(y), and |zy| = |A(x) - A(y)| = 2. 


Now we must convert these matrices into permutations. 


ay Hath tt where a;; stands for the ith row and jth column of the matrix. 
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2 0 

Then for A(z) = , we have 
0 6 

Q11 =2=>%4- #, 


a2, = 6 => to — £8. 


We have 2 t’s since [G : H] = 2, and our t’s are of order 11 since Zj, is the smallest 


finite field that has 5th roots of unity. 


Therefore, our permutation representation of A(z) is 


x = (1,3,7,15,9, 19,17, 13, 5, 11)(2, 12, 6, 14, 18, 20, 10, 16, 8, 4) 


0 1 
Similarily, for A(y) = , we have 
0 


ag =1= - to, 


ag3 = 1 => > to > 11. 
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Therefore, our permutation representation of A(y) is 


y = (1, 2)(3, 4)(5, 6), (7, 8), (9, 10), (11, 12), (13, 14), (15, 16), (17, 18), (19, 20). 


A presentation for Dig is < x, y|x", y?, (aly)? >. 


Thus, by definition, our presentation of the monomial progenitor 11*? :, Dio will 


be 


< 2,y|x"°, y, (a—ly)?,t”, Normaliser(N, <t >) > 


Since our t’s are of order 11, we will have t” = t"'. 

Now we must find the Normaliser(N,< t >), that is, the permutations that sta- 
bilize all the powers of t1, {1,3,5,7,9,11,13,15,17,19}. 

Let t ~ ¢4. 

We then find these permutations. 


> Normaliser:=Stabiliser (N, {1,3,5,7,9,11,13,15,17,19}); 
> Generators (Normaliser) ; 


{ 
(ly ddp 85 233 2G By 94 Dby. Ty Syl Ap 839- 1by- 07 6204 


Therefore, Normaliser(N, < ty >) =< (1, 11,5, 13, 17, 19,9, 15, 7,3)(2, 4,8, 
16, 10, 20, 18, 14,6, 12) >. 


Since 2! = (1, 11,5, 13, 17, 19, 9, 15, 7, 3)(2, 4, 8, 16, 10, 20, 18, 14,6, 12), and 
a! sends t, to t8, we have that t” ' = ¢°. 
Thus, the presentation of the monomial progenitor is given by 


11) Die =< ey tle: (ty)? ett ¢7 ={°s, 
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Next we add the following first order relations to our progenitor to find finite homo- 


morphic images. 


(x°t)?, (yt)? 


> G<x,y,t>:=Group<x,y,t|x°10,y"2, (x°-lx*y) 72, 
> t711,t* (x*-1)=t7*6, (x*5*t)°2, (y*xt) 73>; 

> #G; 

1320 

> £,G1,k:=CosetAction (G, Sub<G|x,y>); 

> #k; 

1 

> CompositionFactors (Gl); 


G 
Cyclic (2) 


Double Coset Enumeration will be performed in a later chapter. 
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Chapter 5 


Double Coset Enumeration 


5.1 Preliminaries 


Definition 5.1. /Rot95] The Dihedral Group D,,, n even and greater than 2, groups 
are formed by two elements, one of order 5 and one of order 2. A presentation for a 


Dihedral Group is given by < a, bla? ,b?, (ab)? >. 


5.2  L2(11) as a Homomorphic Image of 2*° : Dy» 


5.2.1 The Construction of L2(11) Over Dy» 


Consider 2*° : Dig, where Dig =< x,y,z >, x ~ (12)(35)(46), y ~ (134)(256), 
z ~ (12)(36)(45), and t ~ ty. 
The progenitor 2*° : Dj, is factored by (at)?, (zt¥)°, (yt)®, and (axyt)®. 


G= arta OS, Taye has symmetric presentation 
<2,y,2,t|27, y°, 27, ways, (yz), (ez)?, 
t?, (t, xz), 

(xt)®, (zt¥)°, (yt), (wyt)® > 

We will first show that |G| < 336 by performing manual double coset enumeration of 


G over N. 


Let us expand our additional relation 


Gt S13 

(at,)? =1 

(x?ty" ty*t;) =1 

(12) (35) (46)tytoty = 1 
(12)(35)(46)t, = tite 


Nt; = Ntite 
(2t¥)? =1 
(zt,¥)° =1 
(2t3)° =1 


2 ts” ts” ty” tots = 1 
(12)(36)(45)t3°tg"22G-945)p.¢¢,1 208.645) ¢, — 1 
(12)(36)(45)tgtetstets = 1 

(12)(36)(45)tste = tstets 


(yi)? 
(yt)? =1 
ytyY ty ty tty = 1 
(143) (265 ty (134) 256) ¢, eg, (143) (265) 4, (134)(256) 4 = 
(143) (205)tst,tatsti = 1 
(143) (205)tst, = tytsta 


(ayt)® =1 

(xyt;)® =1 

(xy) 929 ty28 ty ty tty =1 

eit (168245) (194) (286) 5, (12)(35) (48) p, (143) (268) (154288) | 
tetgtotatst, = 1 


tet3tg = tyt5t4 
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(5.2) 


(5.3) 


(5.4) 


56 


Our first double coset, NeN = {Ne"|n © N} = {N}, 
which we will denote by [x]. 


N is transitive on {1,2,3,4,5,6} so it has one single orbit {1,2,3,4,5,6}. 


We will take a representative from this orbit, say 1, and find out to which double 


coset Nt, belongs. 
Nt,N is a new double coset which we will denote by [1]. 


Since the orbit {1,2,3,4,5,6} contains 6 elements then 6 symmetric generators will 


go to the new double coset [1]. 


N! = Point Stabiliser in N of Nt; = {n € N|t? = ti} = {e, (34)(56)}. 
N®) = Coset Stabiliser in N of Nt, = {n € N|Nt? = ti} = {e} = N?. 


Now N@®) > N}, 
N! = {e, (34) (56)}. 


Since we do not have a relation that will increase the Coset Stabiliser N“), then 


N® = N! = {e, (34)(56)}. 


The number of single cosets in Nt, N is at most Ne] a 3 = 6. 
Nt,N = {Nt1"|n € N}. 


NtN ={Nty, Nto, Nts, Nta, Nts, Nte}. 


The orbits of N@ on {1,2,3,4,5,6} are {1}, {2},{3,4}, and {5,6}. We take t, 
to, t3, and ts, from each orbit respectively, and determine to which double coset 


Nett, Ntyta, Nityts, and Ntyts belong. 
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Nt t; = N € [x] (Since our ?t’s are of order 2.) 
Since the orbit {1} contains one element, then one symmetric generator goes back to 


the double coset [x]. 


Nt itz = Nt, € [1] (by Equation 5.1). 


One symmetric generator will go back to [1]. 


Nt t3N is a new double coset which we will denote [13]. 


Two symmetric generators will go to the new double coset [13]. 


Nt,tsN is a new double coset which we will denote [15]. 


Two symmetric generators will go to the new double coset [15]. 


Below is our Cayley Diagram thus far. 


N(@3) > N33, 

N= {eh 

Since we do not have a relation that will increase the Coset Stabiliser N“®), then 
N(3) = NB {e}. 
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The number of single cosets in Nt t3N is at most Naa = 2 = 12. 
Ntit3N = {Ntit3"|n € N}. 


Nt,t3N = {Ntyt3, Ntots, Ntgt4, Ntote, Ntaty, Ntste, Ntita, Ntgto, Ntgts, Ntste, Ntats, Ntgty}. 


N(5) > N45. 
N? = {e}. 
Since we do not have a relation that will increase the Coset Stabiliser N“®), then 


NO) NT = fel. 
The number of single cosets in Nt,ts5N is at most aey = 2 = 12. 


NtitsN = {Ntits"|n € N}. 
Ntit5N = {Ntits, Ntite6, Ntot3, Ntota, Ntz3te, Ntgte, Ntate, Ntats, Ntsta, Ntst1, Ntet1, Ntets3}. 


The orbits of NC?) on {1,2,3,4,5,6} are {1}, {2}, {3}, {4}, {5}, and {6}. We take 
ty, te, t3, ta, ts, and tg, from each orbit respectively, and determine to which double 


coset Ntytsty, Ntitsto, Ntytsts, Ntytsta, Nt t3ts, and Ntyt3t¢ belong. 


First we will examine Ntjts3t1. 

(143) (265)t3t) = titgta, by Equation 5.3 
—> (143)(265)tstita = titstata 

==> (143)(265)t3tita = tits 

=> t4(143)(265)t3tita = tatits 

=> (143)(265)t99) PC) tty ty = tatits 
=> (143)(265)tst3tita = tatit 

—> (143)(265)tits = tatyts 

== (143)(265)t tat, = tatytsty 

Also, 

(143) (265)t3t) = titgta, by Equation 5.3 
—> [(143) (265)tgt,]02)25) = [ty tgtg]3)(25) 
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—> (134)(256)t ts = tgtits 

=> (134)(256)titst, = tgty tate 

=> (134)(256)tyt3ta = tgty 
Therefore, (143)(265)ti tat, = tatitgt, 


—> (143) (265)tytaty = taty[(134)(256)t, t3t,] 

— > (143)(265)ty tat, = (134) (256) [tat |") 9 t, tat, 

—> (143) (265)tytat, = (134) (256)tyt3tytsta 

—> (143) (265)t tat, = (134) (256) [e]tit3titsta 

—> (143) (265)t tat, = (134) (256) [(12)(35)(46)ty tot, |tit3titgta, by Equation 5.1 
=> (143) (265)ti tat) = (152436)ti tetstitsty. tetgte = titsta, by Equation 5.4 


=> [tgtgty]02) C546) — [ty t5t4]2)65)46) 

=> tatsti = tatzte 

—> tytstits = totstete 

—> tytstits = tots 

Thus, (143)(265)titaty = (154236)titotatitata 
=> (143) (265)tytat) = (154236)t) [tatstite]titsta 
(12) (36) (45)t3te = tgtgt3, by Equation 5.2 


—> [(12)(36)(45)t3t6]¢9 25 = [tgtet3] 9) C5) 
=> (35)(16)(42)tite = titet 
==> (16)(24)(35)tite = titeti 
Thus, 
(143)(265)tytyty = (154236)ty tatstitetitsta 
—> (143)(265)tytaty = (154236)ty tats [(16)(24) (35)tite|tsta 
—> (143) (265)tytaty = (154236) (16) (24) (35) [tytats|C9C% 5) ts tetgta 
—> (143)(265)t tat, = (13)(25)tetotstitetsta 


Also, 

tet3tg = titst4, by Equation 5.4 

=> [tet gto] (154236) = [ey ty tg] (154236) 

=> tyte6t3 = t5tato 

Thus, 

(143) (265)ty tat) = (13)(25)tetotgtitetsta 

—> (143)(265)t tat, = (13)(25)tetots|tstate]ta 
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= (143) (265)ty tat, = (13) (25)tetats3tstatets 
= (143) (265)ty tat, = (13) (25)tetatsts[(16) (24) (35)t4te], since 
[(12) (36) (45) tg3tg] 84) (259) = [egtgtz]84)(256) —» (16) (24)(35)tate = tatots (Equation 


—> (143)(265)tytat, = (13)(25)(16)(24)(35) (tetotgts)C9CVE5) tt 

=> (143)(265)t tat) = (154236)ty tatststate 

—> (143)(265)tytaty = (154236)tyt4[(12)(35)(46)ts|tata, since 

[(12) (35) (46)t,]154296) — [t,t] 154236) —. (12)(35)(46)ts = tst3 (Equation 5.1) 

— > (143)(265)tytat, = (154236)(12)(35) (46) (tyt,) 02) G5) 49 tetaty 

—> (143)(265)tytaty = (134) (256)totetstaty 

=> (143)(265)ti tat, = (134) (256) tote |[titets], Equation 5.4 conjugated by (15) (23) (46) 
=> (143) (265)titat: = (134)(256)totetitets 

=> (143) (265)titat) = (134)(256)t2[(16)(24)(35)t¢ti]t3, since 
[(12)(36)(45)t3tg]2925) = [tgtgts]9)25) — (16) (24)(35)tits = tytet, (Equation5.2) 
> (143)(265)ti tat, = (134)(256) (16) (24) (35)1 CY ret t3 

=> (143)(265)t tat, = (15)(23)(46)tatetits 

=> (143) (265)tytaty = (15)(23) (46) [(12)(35)(46)t4]t1t3, since 

[(12)(35) (46)t1]49)(265) — [t to] (149)(265) —» (12)(35)(46)t4 = tate (Equation 5.1) 
—> (143)(265)ty tat, = (13)(25)tatits 

=> (143) (265)tit4ty = (13)(25)[(143) (265)t,t4], since 

[(143) (265)tgt,] 49) 265) — [ty tg¢4](49) 265) —. (143) (265)tita = tatits (Equation 5.3) 
—> (143)(265)tytaty = (34)(56)tyta 


—> [(143)(265)t, tat] C69 = [(34) (56)t,t4] CV 69) 
= (134) (256)tit3t1 — (34) (56)tit3 
Thus, Ntyt3t; = Ntit3 € [13]. 


One symmetric generator will go back to [13]. 


Ntit3t2N is a new double coset which we will denote [132]. 


One symmetric generator will go to [132]. 


Nt1t3t3 = Ntl € [1]. 


One symmetric generator will go back to [1]. 
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Ntyt3t4 = Ntgt, € [13], by Equation 5.3. 


One symmetric generator will go back to [13]. 


Ntyt3ts5 = Ntogt3 € [15], by Equation 5.1, since 
[(12)(35)(46)t,]"9@25) = [t,t] 4925) — (12)(35)(46)t3 = tgts 
—> t1(12)(35)(46)t3 = titsts 

=> (12)(35)(46)10 9 C4 4, = ty tats 

—> (12)(35)(46)tots = tytats. 


One symmetric generator will go to [15]. 


Ntit3t¢N is a new double coset which we will denote [136]. 


One symmetric generator will go to [136]. 


Below is our Cayley Diagram thus far. 


[15] 


The orbits of N@® on {1,2,3,4,5,6} are {1} , {2}, {3}, {4}, {5}, {6}. We take ty, to, 
tg, ta, t5, and tg, from each orbit respectively, and determine to which double coset 


Ntyts5t1, Ntytsto, Nt tst3, Nt tsta, Nt tsts, and Ntyt5t6 belong. 


Ntyit5ty = Ntits5 € [15], since 
[(12) (36) (45) tt] (43)(265) = [tgtgtg] 149) 265) 
= (15) (23) (46) tits = t1t5t1, by Equation 5.2. 


One symmetric generator will go to [15]. 


Ntitst2N is a new double coset which we will denote [152]. 


One symmetric generator will go to [152]. 


Ntytst3 = Ntots € [13], since 

[(12) (35) (46)t,]@5)23)46) — [¢, ¢9](15)23)(46) —s (12)(35)(46)ts = tsts 
—> t1(12)(35)(46)ts = titsts 

=> (12)(35)(46)(07 C94) 4, = trests 

=> (12)(35)(46)tots = tytst3, by Equation 5.1 


One symmetric generator will go back to [13]. 


NtitstaN is a new double coset which we will denote [154]. 


One symmetric generator will go to [154]. 


Ntytsts = Nt, € [1]. 


One symmetric generator will go to [1]. 


NtytstgN is a new double coset which we will denote [156]. 
One symmetric will go to [156]. 


Below is our Cayley Diagram thus far. 


62 


63 


(132) > 132. 
NI88 4 el. 
Next we will check to see if any of our relations will increase the number of elements 


in the coset stabilizing group N82). 


tytgty = titgte 
=> ty t3t2 = ty[tetitst4], since 
[tet sta] (193245) — fe, #54] (163245) 
—> tgtot, = tetits 
=> t3tlotgty = tetytst4 
=> tstg = tetitst4 by Equation 5.4 
tyt3tg = tytetitsta 
tyt3t2 = [(16)(24)(3 eens since 
[(12)(36)(45)tate]9)C°) = [tgtets]9@) 
= > (16)(24)(35)tits = titeti, by Equation 5.2 
tytgtz = (16)(24)(35)titetsta 
=> titgt2 = (16)(24)(35)t1[(134)(256)t5tete|ta, since 
[(1.43) (265)tgt1] 192985) = [ty tgt4) 0920085) 
—> (134) (256)tstg = tetste 
=> (134) (256)tstet, = tetstate 
=> (134)(256)tstet2 = tets, by Equation 5.3 


134) (256) 


titstz = (16)(24)(35)(134)(256)¢! tstetota 

=> tytgty = (12)(36)(45)tgtstetots 
Perc 6)(45)[(12)(35)(46)ts]tetata, since 
[(12)(35)(46)t]O9C% = [tyt2]090% 


6) 
=> (12)(35)(46)tz = tgts, by Equation 5.1 


=> tytgtz = (34)(56)t3tetota 

— tytgt, = (34)(56)tgtetstatota 

— tytsto = (34)(56)tstetststota 

=> t)t3t2 = (34)(56)[(12)(36)(45)tgtg]tgtets, by Equation 5.2 
=> tt3tz = (12) (35) (46)tgtetgtota 

=> t1t3t2 = (12)(35)(46)t3t6[tetits], since 

[tgtgta] (193245) — fe, stg] (168245) 


=> tgtot, = tetyts, by Equation 5.4 
tyt3tz = (12)(35)(46)tgtetetits 

=> t)t3tg = (12)(35)(46)t3tits 

— > Ntyt3t2 = Ntstits. 


Now, since [Ntyt3t2]“¢2@5) = Ntgtyts = Ntytgte, then (13)(25) € N“°*2), 


Also, t5tat3 = t5tat3 

=> tstats = ts[(15)(23)(46)tatste], since 
oe 6)(45)t tg] 163245) = [tgtgt] (163245) 
5)(23)(46)tat3 = totgte 

5)(23)(46)totgto = totstote 

5) (23) es = tgts3, by Equation 5.2 
= (15)(23)(46)t0) P99) tot sto 

—> t5tot3 = (15) (23) (46)titotste 
15)(23)(46)titatste 

15) (23) (46) [(12) (35) (46)t1|t3t2, by Equation 5.1 
=> tstots = (13)(25)ti tate 

— > Ntstotz — Ntytsto. 


=> tstat3 = 


=> tstot3 


( 
( 
= 
( 
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65 
Since [Ntyt3t2]) 2349) = Ntstots = Ntitgtz, then (15)(23)(46) ¢ (2), 


Also, [Nt tst2] (12)(35)(46) — = [Ntgtyts| (12)(35)(46) 
= Ntotsty = Ntstats 


So, N(82) >< (13)(25), (12)(35)(46) >= {e, (13)(25), (12)(35)(46), (15)(23) (46)}. 
The number of single cosets in Ntit3t2N is at most Ney = 2? = 3. 

Ntit3toN = {Ntitste = Ntotsty = Ntstots = Ntgtits, Ntgtats = Ntstgts = Ntgtst4 = 
tytg3te, Ntatite = Ntetota = Ntotet) = Ntytate}. 


(136) > 136, 

N136 = fe}, 

Next we will check to see if any of our relations will increase the number of elements 
in the coset stabilizing group N29), 

titste = titate 

=> tit3te = t1[(12)(36)(45)t3t6t3], by Equation 5.2 
> titsts = (12)(36) (45) 0 tstets 

=> t)t3tg = (12)(36)(45)tatstets 

=> tit3t6 = (12)(36)(45)[tatsti|t3, since 

[totgta] 2229) 49) — fey tye] 12085) (48) 


=> tytst; = totgtg, by Equation 5.4 
tyt3t = (12) (36) (45)tatstits => t1t3te = (12)(36)(45)t4[(15) (23) (46)tstits|ts, since 


[(12)(3 6)(45)t3te] (16)(24)(35) _ = [tgtgtg] (16) 4) 35) 
==> (15)(23)(46)tsti = tstits 
—> (15)(23)(46)tstits = tstitsts 
=> (15)(23)(46)ts5tits = tst1, by Equation 5.2 
titstg = (12)(36)(45)ta(15)(23) (46)tstitsts 
= tyt3tg = (12)(36) (45) (15)(23)(46)t0°) C99) 4.4 ests 


256 )tetstitsts 


( 
(256)tgtst1[(12) (35) (46)ts], since 


(12)( 
=> t1t3t¢ = (134) 
(134) 


=> t1t3t6 = 
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[(1.2) (35) (46)¢4](15)(28)46) — Fp, ty](45)(23)(48) 
=> (12)(35)(46)ts = ts5t3, by Equation 5.1 

tytgtg = (134) (256)tgtsty (12) (35) (46)ts 

—> tytgtg = (134) (256) (12)(35) (46) [tgtsty| 12 5) 49) ¢, 

—> tt3ts = (154236)ttgtots 

=> tytytg = (154236) |(134)(256)tstaty|tats, since 

[(143) (265)t3t,J2929) = [ey tgtq] O98 

=> (134)(256)tsta = tatgty 

—> (134)(256)tgtaty = tatgtyty 

=> (134) (256)t3tat1 = tat3, by Equation 5.3 

tytgts = (154236)(134)(256)tgtatitots —> titgts = (163245)tstatitots 

=> tyt3tg = (163245)tgt4[(12)(35)(46)ti]ts, by relation 5.1 

—> tytgtg = (163245) (12) (35)(46) [tgt4]U?) G5) 46) +t; 

=> tt3tg = (143) (265)ts5tetits 

=> t1t3t¢ = (143) (265)t5|t3teta], since 

[tetgta]9)C%) = [tytst4] 099) 

= > tetits = tstota, by Equation 5.4 

tyt3tg = (143)(265)t5t3teta => titgts = (143)(265)[(12)(35)(46)ts|teta, since 

[(12)(35)(46)¢,]5)23) 46) _ [£1 £2] (1528) (46) 

=> (12)(35)(46)ts = tst3, by Equation 5.1 

tytgte = (143) (265) [(12)(35) (46)tstets 

=> t)t3tg = (163245)tstot, 

=> Nt t3te = Nts5tota 

[Ntitgte] 15) C346) — Ntstots = Ntitste 

—> (15)(23)(46) € N38), 

Thus, N86) >< (15)(23)(46) >= {e, (15)(23)(46)}. 

The number of single cosets in Ntit3tgN is at most Nase = : = 6. 

NtitgtgN = {Ntitgtg = Ntstota, Ntotsta = Ntgtitg, Ntgtato = Ntgtst,, Ntatits = 

Nitgtet3, Ntstet, = Ntatgte, = Ntgtot3 = Nttats}. 


N (152) > 152. 
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N19? = fel. 


Next we will check to see if any of our relations will increase the number of elements 


in the coset stabilizing group N“®2). 


tyt5to = titste 


=> tytste = tyts[(12)(35)(46)tet1], by Equation 5.1 
—> tytsty = (12)(35)(46) [tts]? C94) toe, 

=> tytst2 = (1 2)(35)(46)totgtoty 

=> tyts5t2 = (12)(35)(46)[(15)(23) (46)tot3]t1, since 
[(12) (36) (45)tgte](19394) = [tgtetg] 16824) 


=> (15)(23)(46)tot3 = tet3t2 , by Equation 5.2 
trtst2 = (12)(35) (46) (15) (23) (46)tatst 

=> tytsto = (13)(25)tetgty 

— Ntitst, — Ntotsty 


Then, since [Ntytst2]?)@5)49) — Ntgt3t; = Ntytstz, then (12)(35)(46) ¢ N@%), 
Also, 

totst, = tetstr 

=> tot3t, = tg[(134)(256)tyts3t4], since 
[(143)(265)tg3t,JO9 C25) = ftytgtq]OP) C544 t, 

=> (134)(256)t3tita, by Equation 5.3 

tot3t, = to(134)(256)ttsta 

=> totzt, = (134) (256) 09 OP 4 tty 

=> totsty = (134) (256)tstitsts 

—> totyt, = (134) (256)tst; [(12)(35)(46)tgts]ta, since 
[(12)(35)(46)t]O9C) = [tyte]09C% 

=> (12) (35)(46)t3 = tats 

=> (12)(35)(46)tgts = tgtsts 

=> (12)(35)(46)t3ts5 = t3, by Equation 5.1 

totgty = (134) (256)t5t1 (12)(35) (46 )tststa 

—> totsty = (134) (256)(12)(35)(46)tstotgtst, 

—> totgty = (154236) tgtotgtsta 
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—> totsty = (154236)[(15)(23)(46)tsto|tsta, since 
[(12)(36)(45)tgt6](VC® = [tgtgts]YC% 
=> (15)(23)(46)t3t2 = t3tats3, by Equation 5.2 
totgty = (154236)(15)(23)(46)t3totsta 
=> totyty = (34)(56)tgtotsta 
= (34)(56)t3te[tataltsta 

=> totst, = (34)(56)tgtotatatsta 
=> tot3t, = (34)(56)[tetits|tatst4, since 
tetata|(193245) — [ty tet 4] (163245) 
=> tgtot, = tetits, by Equation 5.4 
tot3t, = (34)(56)tgtitstatsts —> totgt, = (34)(56)tgtits[(12)(36)(45)tats], since 
[(12)(36)(45)tgte]CVC9 = [tgtets] VCO) 

=> (12)(36)(45)tats = tatst4, Equation 5.4 
totgt; = (34)(56)tetits (12) (36) (45)tats 


=> totst, = (34)(56)(12)(36)(45) [tetrts] 12) C9) t4¢5 
—> totgt, = (12)(35)(46)tgtotatats 
—> totsty = (12)(35)(46)tstots 
—> Ntot3t, = Ntgtats 


Thus [Ntytst] (19) 25)(46) = Ntztats = Ntotsty = Ntyt5te 
—> (13) (25)(46) € N52), 


So, N(@52) >< (12)(35)(46), (13)(25)(46) >= fe, (12)(35) (46), (13) (25) (46), (15)(23)}. 
The number of single cosets in Ntit5t2N is at most | wee = — ?e= = 3. 

NtytstoN ={Ntytsto = Ntgt3t; = Ntst3t, = Ntgtots, Ntstets = Ntstats = Ntetsta = 
tatstg, Ntatete = Ntetita = Ntotaty = Ntitete}. 


N (154) > 154, 
N14 = { e}. 
Next we will check to see if any of our relations will increase the number of elements 


in the coset stabilizing group N“4), 
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[Ntytst4]9) 2435) — Netgtgtz = Ntytst4, by Equation 5.4. 
Thus, (16)(24)(35) € N54), 


So, N54) >< (16)(24)(35) >= fe, (16)(24)(35)}. 

The number of single cosets in Ntit5t4N is at most inte = 2 = 6. 

NtitstaN = {Ntytst4 = Nigtsto, Ntotsts = Ntatst,, Ntgtgt, = Ntotats, Ntstato = 
tytgt3, Ntatet3 = Nts5titg, Ntgtits = Ntgtot4}. 


N (156) > 156. 
N16 — { e}. 
Next we will check to see if any of our relations will increase the number of elements 


in the coset stabilizing group N°), 


titste = titste 
=> titste = [tet3tata|tg, since 

tetgta = tytst4 => tetgteta = tits5tata 
=> tetsteta = t1t5,Equation 5.4 

titsts = tetstotate 

=> titste = tet3te[(12)(35)(46)t4], since 


[(12) (35) (46 )tJ(9C® = [ey t9]0H C9) 

=> (12)(35)(46)t4 = tate, by Equation 5.1 
tytste = (12)(35) (46) [tetgtg] 25) 46)¢, —> tytsts = (12)(35)(46)tatstita 
tytsts = (12)(35)(46)tatstits —> titsts = (12)(35)(46) [tatste]ta, since 


[tetgt] 12) (35) (46) = ttt] (12) (35) (46) 

=> tytst, = tot3te, by Equation 5.4 

tytste = (12)(35)(46)totsteta 

tytste = (12)(35) (46) [(15) (23) (46)tot3taltet4, since 
as _ 6)(45)tgte] 164) = [tgtetg] V4) 
23)(46)tots = totgte 

23)(46)tot3ty = totgtote 


( 
( 


5)(23)( 
5)(23)( 
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=> (15)(23)(46)tetgt2 = tot3, by Equation 5.2 
tytste = (13)(25)totgteteta 
==> tytstg = (13)(25)tot3t2[(12)(35)(46)ts], since 
[(1.2)(35)(46)t,] 63245) — [et] (168245) 

=> (12)(35)(46)t¢ = teta, by Equation 5.1 


tytste = (13)(25)(12)(35) (46) [tatgtg] 1?) 65) 49) ¢, 
=> tyt5te = (15)(23) (46)tit5tite 
=> tyt5te = (15)(23) (46)t, [tatets], since 


[tet gto] 143) (265) — [ty t5¢4](148)(265) 
=> t5t te = tatots3, by Equation 5.4 
tytste = (15)(23)(46)ti tatets 
=> tit5tg = (15)(23)(46)tit4[(15) (23) (46)tetste], since 
[(12) (36) (45)tgte] (1394) = [tgtgts](134) 
==> (15)(23)(46)tots = tot3ta 
=> (15)(23)(46)totste = totstate 
=> (15)(23)(46)tot3t2 = teats, by Equation 5.2 
tytstg = (15)(23)(46)(15)(23) (46) [tyt4]1) C9) 49 totsty 
=> tyt5te = t5tetatzte 
=> tytstg = [(143)(265)tets|tste, since 
[(143) (265)t3¢;] (154236) = [ey tgtq](154236) 
=> (143)(265)tets = tstete2, by Equation 5.3 
tytste = (143)(265)tgtstate 
=> tytstg = (143)(265)t¢|(12)(35)(46)ts|t2, since 
re 2)(3 5)(4 6)t,]! (15)(23)(46) _ = [ty t2]15)23) 46) 
=> (12)(35)(46)ts = ts5t3, by Equation 5.1 
tytste = (143)(265)(12)(35) (46) [te] “E949 ts to 
=> titsts = (163245)tatste 
—> Ntitsts = Ntatste 


Since [Ntytst¢]¢929 = Ntatst2 = Ntitsts, then (14)(26) € N@59), 
So, N56) >< (14)(26) >= fe, (14)(26)}. 


The number of single cosets in NtitstgN is at most rica = B =6. 
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NtitstgN = {Ntitste = Ntatsto, Ntatst4 = Ntetsti, Ntstgto = Ntitets, Ntotats = 
tstat,, Ntatets = Ntsgtote, Ntgtit3 = Ntstit4}. 


The orbits of N“82) on {1,2,3,4,5,6} are 
{1,2)573),44, 6): 
we take tg and t,4 from each orbit respectively. 


We want to determine to which double coset Nt, t3tet; and Nt tstot4 belong. 


Ntytgtotg = Nt t3 € [13] 


Thus 4 symmetric generators will go to [13]. 


Ntytgtots = Ntytgtota 

=> Ntjtgtot, = Nti|tetits], since 

[tet gta] (193245) — fe, ¢5¢4] (163245) 

=> tgtat, = tetits, by Equation 5.4 

Ntytgtota = Ntitgtits —> Ntitgtota = N[(16)(24)(35)titg]ts, since 
[(12)(36)(45)tgte|U9C5 = [tgtgt3] C925) 

=> (16)(24)(35)tite = titeti, by Equation 5.2 

Néytstota = Ntitgts € [156]. 


Thus 2 symmetric generators will go to [156]. 


The orbits of N“86) on {1,2,3,4,5,6} are 
{1,5}, {2,3}, {4,6}. 
we take t,, t3, and tg from each orbit respectively. 
We want to determine to which double coset Ntit3tgt1, Ntitstgt3, and Ntit3tgt¢ be- 
long. 


Ntytztet, = Nt t3tgty 
=> Ntytatety = Nt [totats], since 
[tetate]1229)(45) = [4 t5t4](120(88)(45) 


=> tgtet, = totats, by Equation 5.4 


Niytgteti = Ntitotats 
= Ntytgteti = N[(12)(35)(46)t1|tats, by Equation 5.1 
= > Ntitatgt, = Ntitats € [136]. 


Thus 2 symmetric generators will go to [136]. 


Ntitstets = Ntitstets 

=> Ntjtstgt3 = Nt,[(12)(36)(45)t3t6], by Equation 5.3 
—> Ntyt3tgtz = N(12)(36)(45)[t]22C845) tat, 

=> Ntjtstgt3 = Ntatstg € [154]. 


Thus 2 symmetric generators will go to [154]. 


Ntit3tete = Ntit3 € [13]. 


Thus 2 symmetric generators will go to [13]. 


The orbits of N“5?) on {1,2,3,4,5,6} are 
43h, 2555344 a Oe 
we take tg and tg from each orbit respectively. 


We want to determine to which double coset Ntitstot2 and Ntitstets belong. 


Ntyts5totg = Ntits5 € (15): 


Thus 4 symmetric generators will go to [15]. 


Ntytstote = Ntitstate 

=> Ntits5tete = Nti[(134)(256)tatste]ts, since 
[(143) (265) t3t,] 5) (23) 46) = [ty tgtg] (15)(28) 46) 
=> (134)(256)tots = tstotg 

—> (134)(256)totste = tstatete 

=> (134) (256)totstg = ts5te, by Equation 5.2 
Ntytstote = N(134)(256)[t1] 2) (259 tots tet, 
—> Ntytstots = Ntgtotst € [152]. 


Thus 2 symmetric generators will go to [152]. 
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The orbits of N“54) on {1,2,3,4,5,6} are 
11,6) ,42 4) 435 
We take t;, t4, and tg from each orbit respectively. 
We want to determine to which double coset Ntytstat;, Ntitstata, and Ntyts5tat3 be- 
long. 


tyt5t4 = tetste, by Equation 5.4 

—> tytstat, = tetgtoty 

=> titstat, = tetstoti 

=> tytst4t, = tets|(12)(35)(46)te], since 

[(12) (35) (46)t]22)65)46) — [#1 t9]2)(85)46) —» (120(35)(46)te = tot). by Equation 
5.1 

tytstaty = (12)(35) (46) [tgts]2)C5) 46) 4, 

—> tytstat, = (12)(35)(46)tatste 

— > Ntytstat, = Ntatst2 € [156]. 


Thus 2 symmetric generators will go to [156]. 


Ntitstata = Ntyts5ta € [154]. 


Thus 2 symmetric generators will go to [154]. 


tyts5t4 = tet3t2, by Equation 5.4 

—> tytstats = tetgtats 

= > tytstats = te[(15)(23)(46)tste], since 
[(12)(36)(45)tgtg|JU9 C9 = [tgtgts]A92& 

=> (15)(23)(46)tst2 = tgtats3, by relation 5.2 
tytstats = (15)(23)(46)t0?P9)09 p34, 

=> tytstats = (15)(23) (46)tatgte 

=> Ntytstatz = Ntatgto € [136]. 


Thus, 2 symmetric generators will go to [136]. 


The orbits of N“@®®) on {1,2,3,4,5,6} are 
{3}, {5}, {1,4}, {2, 6}. 
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we take t3, ts, t;, and tg from each orbit respectively. 
We want to determine to which double coset Ntyitstet3, Ntitstets, Ntitsteti, and 
Ntyt5tete belong. 


tyt5tet3 = tytstet3 

=> tyts5tgtz = [(15)(23)(46)tit5t1|tet3, since 
[(12) (36) (45)tgte]49) C0) = [tgtets] 4909) 
==> (15)(23)(46)tits = titsty 

=> (15)(23)(46)tit5t) = tytstyt) => (15)(23)(46)tit5t; = tits, by Equation 5.2 
tytstet3 = (15)(23)(46)tit5titets 

=> tytstets = (15)(23)(46)tits[t5tate], since 
[tet gta] (154236) — fe, ¢5¢4] (154236) 

=> titet3 = t5tate, by Equation 5.4 
tytstets = (15)(23) (46)titststats 

=> tytstgt3 = (15)(23)(46)titate 

=> Ntitstgts = Ntitate € [132]. 


Thus 1 symmetric generator will go to [132]. 


Nttstets = Ntitstets 

=> Nttstgts = [Ntatsta]ts, since Ntytstg = Ntatste 
=> Nitytstets = Ntatstots 

=> Ntjts5tets = Nt4[(134)(256)totstg]ts, since 

[(1.43) (265) tty] 15)230(48) = (4, tg) 15)(28)(48) 

—> (134) (256)tots = tstote 

=> (134)(256)totsts = tstatete 

=> (134)(256)totsts = tst2, by Equation 5.3 
Ntitstets = N(134)(256)t¢ ?) O totstets 

— Niitstets = Ntitotstets 

= > Ntits5tets = N[(12)(35)(46)t,|tstets, by Equation 5.1 
=> Ntjtstets = Ntitstets 

=> Ntjts5tets = Ntits[(134)(256)tstgte], since 
[(143)(265)tgt,] 8) 24)(35) ~ [tt3tq] 19) (24) (35) 
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=> (134)(256)tstg = tetste 

=> (134)(256)tstete = tgtstote 

=> (134) (256)tstgte = tets, by Equation 5.3 
Ntytstgts = N(134)(256)|[tyts](8Y 9 tstety 

— Nirtstets = Ntstetstete 

=> Ntyts5tgts = N[(12)(36)(45)tgtets|tstgte, by Equation 5.2 
—> Ntytstets = Nt3tetatstete 

=> Ntjts5tgts = Nt3te|(12)(35)(46)t3|tete, since 
[(12) (35) (46) ty] 134)(256) — [ty ty](134)(256) 

=> (12)(35)(46)t3 = t3ts, by Equation 5.1 

Ntytstgts = N(12)(35)(46)[tgt¢] 2) G5) 49 tatety 

=> Ntitstets = Ntstat3teto 

=> Ntjts5tets = Ntst4[(12)(36)(45)tgtgts|te, by Equation 5.2 
—> Ntytstgts = N(12)(36)(45)[t5ta]?) G94) totetgte 
=> Ntjtstets = Ntatsts3tetsto 

=> Ntjts5tgts = Nt4[(12)(35)(46)ts5|tgt3te, since 
[(12) (35) (46) ty] 154236) — [t,t] (154236) 

=> (12)(35)(46)ts5 = tst3, by Equation 5.1 

Ntytstgts = N(12)(35)(46)t0 20?“ ¢ tetgto 

— Nirtstets = Ntetstetste 

=> Ntitstets = Ntots|titsta], by Equation 5.4 

— Ntitstets = Ntetstitsta 

=> Ntjts5tgts = Nte|(15)(23)(46)t5ti]t4, since 
[(12)(36) (45)tgtg] 192435) = fegtgts] 4924) (85) 

=> (15)(23)(46)t5t, = tstits, by Equation 5.2 
Ntytstets = N(15)(23)(46) 10? CP?) eet tg 

=> Niitstets = Ntatstita 


=> Ntjts5tets = N[tatstg|ta, since 
[totstn](12)(25)(48) — fey tety](12)(85)(48) 

=> tatst, = totstg, by Equation 5.4 
Nttstets = Ntotsteta 

=> Ntjts5tgts = Ntgts[(12)(35)(46)t¢, since 
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((12)(35) (46) ty] 299249) = (ty t9](065249) 

=> (12)(35)(46)tg = teta, by Equation 5.1 
Ntytstets = N(12)(35)(46) [totg]12)25)(48) ¢, 
—> Ntitstgts = Ntitsts € [156] 


Thus 1 symmetric generator will go to [156]. 


Ntitstg = Ntatsto 

—> Ntytstet: = Ntatstetr 

=> Nititsteti = Ntats[(12)(35)(46)ta], since 
[(12)(35)(46)t,]"2)85)46) = [ty tq] (1265) 46) 
=> (12)(35)(46)t2 = tet, by Equation 5.1 
Ntytstet, = N(12)(35)(46)[tats]“2)25)49) to] 
—> Ntytstgt, = Ntgtgt, € [154] 


Thus 2 symmetric generators will go to [154]. 


Ntytstete = Ntyts € [15]. 


Thus 2 symmetric generators will go to [15]. 


Below is our completed Cayley Diagram. 
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Figure 5.1: Cayley Diagram : L2(11) Over Dy»2 


IG| < IN}, INE 4 INE 4. INT | IM, INT, I 
=s [N| Tr [N@)| U |NG3)| l |NG5)| q |N(32)| u |N(@36)| 


12 _B MD As TOs A = AD Ao 243 
12. OR ie Ae ee 

= (12+6+12+12+3 

=55~x 12 


IN| |N| 
T Tv C53)] [vG54) [WC56)| x |N| 


6+3+6+6) x 12 


= 660 
G < 660 


Next we will show that |G| > 660. We compute the action of G on the 55 cosets in 
N in G that we have found. 
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Table 5.1: Single Coset Action of L2(11) Over Dj2 


Label Single Cosets x y z ty 

1 N 1 N 1 N 1 N 2 Nt, 

2 Nt, 3 Nto 4 Nt3 3 Nto 1 Ntyty 
3 Nto 2 Nty 6 Nts 2 Nty 3 Ntoty 
4 Nt3 6 Nts 5 Nt4 7 Nt6 13 Ntsty 
ts) Nt4 7 Nte 2 Nt, 6 Nts 14 Ntaty 
6 Nts 4 Nt3 7 Nte 3) Nta 29 Ntsty 
7 Nte 4 Nt4 3 Nto 4 Nts 30 Ntety 
8 Ntyts 10 Ntots 12 Ntstg 11 Ntots 8 £Netytst 
9 Ntyta 11 Ntgts 13 Ntgt, 10 Ntots 9 Netytat 
10 Ntots 8 Nttz 16 Ntsts 9 Ntytg 32 Ntotst 
11 Ntote 9 Ntts 17 Ntsta 8 £.Ntyts 34 Ntotet 
12 Ntgta 16 Ntsts 14 Ntsty 19 Ntgts 15 Netotat 
ie Ntsty 17 Ntstg 15 Ntgts 18 Ntgta 4 #£Netgtit 
14 Ntaty 18 Ntgta 8 £Ntyts 17 Ntste 5 Ntaty 
15 Ntats 19 Ntgts 9 Ntts 16 Ntstg 12 Ntatsty 
16 Ntste 12 Ntgts 18 Ntgte 15 Ntatz 39 Netstet 
i7 Ntsto 13 Ntst; 19 Ntgts 14 Ntgt; 25 Nestot 
18 Ntgete 14 Ntgti 10 Ntots 13 Ntsti 26 Ntetot 
19 Ntets 15 Ntstg 11 Ntotg 12 Ntgts 37 Netgtst 
20 Ntits 22 Ntots 24 Ntstg 23 Ntotg 20 Ntytst 
D1 Ntyte 23 Ntots 25 Ntsto 22 Ntots 21 Ntytet 
22 Ntots 90° Nits. “28° Nisty 21° Ntitg -41. (Netstet 
23 Ntota 21 Ntts 29 Ntstr: 20 Ntts 43 Ntotat 
24 Ntste 28 Ntsts 26 Ntato 31 Ntgtgs 46 Ntgtgti 
25 Ntszto 29. Ntst, 27 Ntats 30 Ntgty 17 Nestot 
26 Ntate 30 Niet 20 Ntts 29 Ntst; 18 Ntatot 
27 Ntats 31 Ntgts 21 Ntite 28 Ntsts 45 Ntatsty 


Continued on next page 


Table 5.1 — Continued from previous page 
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Label Single Cosets G y z ty 
28 Ntsta 24 Ntste 30 Ntet, 27 Ntats 53 Ntstati 
29 Ntsty 25 Ntst. 31 Ntgts 26 Neate Ntstity 
30 Ntety 26 Ntgtp 22 Ntots 25 Ntgtp 7 #Netgtity 
31 Ntgts 27° Ntats 23 Ntots 24 Ntats 51 Ntgtati 
32 Ntytsto 32 Ntotst, 33 Ntstats 34 Ntgtits 10 Ntytstoty 
33 Ntstats 33 Ntstets 34 Ntatits 33 Négtats 54 Negtatsts 
34 Ntgtite 34 Ntgtets 32 Ntytgt. 32 Ntytgt. 11 Ntgtytety 
35 Ntytste 36 Ntotsts 37 Ntstato 38 Ntgtits 40 Ntytstety 
36 Ntotsta 35 Ntitsts 39 Ntstgti 40 Ntgtets 48 Ntetstat 
37 Ntsztate 39 Ntsteti 38 Ntgtyts 37 Ntstate 19 Ntgtatoty 
38 Ntatits 55 Ntgtets 35 Ntytste 35 Ntytste 49 Ntatytst 
39 Ntsteti 37 Néstatg 40 Nigtots 39 Nestgti 16 Nestetits 
40 Ntgetats 38 Ntgtyts 36 Ntotsty 36 Ntotsty 35 Ntgtatsty 
41 Ntytsto Al Ntotat; 42 Netatgts 43 Ntatots 22 Netitstots 
42 Ntstets 42 Ntstatz 43 Ntgtote 42 Ntgtgts 42 Negtetsty 
43 Ntatate 43 Ntgtita 41 Ntitsto 41 Ntytste 23 Ntatoteti 
44 Ntitsta 45 Ntotste 46 Ntgtgt, 46 Ntgtgt, 50 Ntytstat 
45 Ntotste AA Ntytsta 47 Ntstato 47 Ntstato 27 Ntotateti 
46 Ntstety 47 Ntstato 48 Ntatots 44 Ntytst, 24 Ntstetyt 
AT Ntstate 46 Ntstgt; 49 Ntgtits 45 Ntotste 52 Netstatoty 
48 Ntagtats 49 Ntgtits 44 Ntytst, 48 Ntatots 36 Ntatotst 
49 Ntetits A8 Ntgtotz 45 Ntotate 49 Ntgtits 38 Ntgtitsts 
50 Ntytste 51 Ntotst, 52 Ntsteta 53 Ntotats 44 Ntytstety 
51 Ntotsta 50 Ntitsts 53 Ntstat; 52 Ntsteta 31 Ntotstaty 
52 Ntgtete 53 Ntstat; 54 Ntgtots 51 Ntotstg 47 Ntstetot 
53 Ntotats 52 Ntitets 55 Ntstit, 50 Ntytsts 28 Ntotatsty 
54 Ntatots 55 Ntgtits 50 Ntytsts 55 Ntgtits 33 Ntatotst 
55 Ntgtits 54 Ntgtots 51 Ntotst, 54 Ntgtots 55 Ntgtytsty 
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Thus, 

f(x) = (2,3)(4, 6) (5, 7)(8, 10)(9, 11) (12, 16) (13, 17) (14, 18) (15, 19) (20, 22) (21, 23) (24, 28) 

(25, 29) (26, 30) (27, 31) (35, 36) (37, 39) (38, 40) (44, 45) (46, 47) (48, 49) (50, 51) (52, 53) (54, 55), 

f(y) = (2,4, 5)(3, 6, 7)(8, 12, 14)(9, 13, 15)(10, 16, 18)(17, 19, 11)(20, 24, 26) (21, 25, 27)(22 

28, 30) (23, 29, 31) (32, 33, 34) (35, 37, 38) (36, 39, 40) (41, 42, 43) (44, 46, 48) (45, 47, 49) (50, 52, 

54) (53, 55, 51), f(z) = (2, 3)(4, 7)(5, 6)(8, 11)(9, 10) (12, 19) (13, 18) (14, 17) (15, 16) (20, 23) (21, 22) 
(24, 31) (25, 30) (26, 29) (27, 28) (32, 34) (35, 38) (36, 40) (41, 43) (44, 46) (45, 47) (50, 53) (51, 52)(54, 55), 
and f(t) = (1, 2)(4, 13) (5, 14) (6, 29) (7, 30) (10, 32) (11, 34) (12, 15) (16, 39) (17, 25) (18, 26) (19, 37) 
(22, 41) (23, 43) (24, 46) (27, 45) (28, 53) (31, 51)(33, 54)(35, 40) (36, 48) (38, 49) (44, 50) (47, 52). 


Now < fae, fy, fz, ft >< S55. f : G —+ Ss5 is a homomorphism, since G acts on 
X = {N, Nt, Nto,...Ntgtit3} with |X| = 55. < fo, fy, fe, fe > is a homomorphic 
image of the progenitor if 

(1) ft has exactly 6 conjugates under conjugation by < fr, fy, fz > and 

(2) < fr, fy, fe > acts on {ft,, ft, Sts; Stas Sts, ftg} by conjugation as S55. 


In addition, if the additional relations (at)? = (zt¥)°> = (yt)® = 1 hold in S55, then 
< fx, fy, fz, f¢ > is a homomorphic image of G. 

Note that | < fr, fy, fz, fr > | = 660. 

G/Kers= ims 

= G/Kers =< fa, fy, fe, ft > 

= |G/Ker;|=|< fe, fy, fe, ft > | = 660 

==> |G|S|"S Tart ade | ery 

=> |G| > 660 


But, from our Cayley Diagram we saw that |G| < 660. 
Hence, |G| = 660. 
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5.3 PGL»(11) as a Homomorphic Image of 11*?:,, Dio 


5.3.1 The Construction of PGL2(11) Over Dio 


Let G & 11*? :,(Di9) be a symmetric presentation of G given by: 
aay tea, (aly)? ¢11, ¢27 = £6, (x)?, (yt)? >& PGL(2, 11), 
where N © Dig =< 2, y|x!®, y?, (aly)? >, 
x = (1,3,7, 15,9, 19, 17, 13, 5, 11)(2, 12, 6, 14, 18, 20, 10, 16, 8, 4), and 


y = (1, 2)(3, 4)(5, 6)(7,8)(9, 10) (11, 12)(13, 14)(15, 16)(17, 18)(19, 20). 


Definition of a double coset: NwN = {Nwn|n € N}. 


1 


Note: wn = nn--wn = nw”. 


So, Nun ={Nw"|ne€ N}. 


First we will expand our additional relation. 
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(yt)? =e 

(yti)? =e 

y(t)” (Yt =e 
ytitot; =e (5.5) 


ytitot ty” = ti? 


ytytg = ie 

ytyts = tig 
Labeling: 
t=t ig=t tu =t? b= 
to = te t7 = t4 ti = t§ ti7 = 2 
=t tg = t3 tig =e] tis = ty 
eat gat? fat fe=i" 
is = tio = 3 tis = tf too = 3° 


Our first double coset, NeN = {Ne"|n € N} = {N}, which we will denote by [x]. The 
orbit of N on {1,2,3,4,5,6,8,7,9,10,11,12,13,14,15,16,17,18,19,20} is {1,2,3,4,5,6,8,7,9, 
10,11,12,13,14,15,16,17,18,19,20}. We will take a representative from this orbit, say 


t,;, and determine to which double coset Nt, belongs. 


Word of Length 1 


Nt,N is a new double coset which we will denote by [1]. NtjN = {Nt,"|n € N}. 
Since the orbit {1,3, 2,7, 4, 12,15, 8,6, 11,9, 16, 14,5, 19, 10, 18, 13, 17, 20} contains 20 
elements then 20 symmetric generators will go to the new double coset [1]. 

Now N® > N?. 

N} = {e}. 

N® = Coset Stabiliser in N of Nt; = {n € N|Nt? = ty}. 


We do not have a relation that will increase the Coset Stabiliser NV). 
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Now, since (Nt,)° = Nt; > e € N“), then, 
N! = N© = Coset Stabiliser in N of Nt; = {n € N|Nt? = t,} = {e}. 
IN| _ 20 _ 


Furthermore, the number of single cosets in Nt,N is NO, 20. 


Therefore, Nt, N = {Nti, Nto, Nts, Nta, Nts, Nte, Nt7, Nts, Nto, Ntio, 
Nti, Nti2, Ntiz, Ntia, Ntis, Ntie, Ntiz, Ntis, Nti9, Ntoo} 


The orbits of N® on {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20} 
are {1}, {2}, {3}, {4}, {5}, {6}, {7}, {8}, {9}, {10}, {11}, {12}, {13}, {14}, 
{15}, {16}, {17}, {18}, {19}, and {20}. 


We want to see to which double coset Nt1t1, Ntite, Ntit3, Ntita, Ntits, Ntite, 
Ntyt7, Ntytg, Ntitg, Ntitio, Ntiti, Ntiti2, Ntiti3, Nitya, Nitis, Ntitie, 
Ntyt17, Ntyt1g, Netto, and Ntytoo belong. 


Ntyty = Nt? = Nt3 € [1]. 


One symmetric generator will go to [1]. 


Ntytz = Ntt® = Ntig € [1], by Equation 5.5. 


One symmetric generator will go to [1]. 


Ntyt3 = Nt,t? = Nt? = Nts € [1]. 


One symmetric generator will go to [1]. 


Nt,t4N is a new double coset which we will denote by [1 4]. 


One symmetric generator will go to [1 4]. 


Ntyts = Nt,t? = Nt? = Ntz € [1]. 


One symmetric generator will go to [1]. 


Nt,teN is a new double coset which we will denote by [1 6]. 


One symmetric generator will go to [1 6]. 


84 


Ntit7 = Ntitt = Nt? = Ntg € [1]. 


One symmetric generator will go to [1]. 


Nt,tgN is a new double coset which we will denote by [1 8]. 


One symmetric generator will go to [1 8]. 


Ntitg = Ntit? = Nt® = Nty € [1]. 


One symmetric generator will go to [1]. 


NtytioN is a new double coset which we will denote by [1 10]. 


One symmetric generator will go to [1 10]. 


Ntity = Nt, t® = Nt = Nti3 € (i 


One symmetric generator will go to [1]. 


Nt,ti2N is a new double coset which we will denote by [1 12]. 


One symmetric generator will go to [1 12]. 


Ntti3 = Nit? = Nt? = Nti5 € (i]s 


One symmetric generator will go to [1]. 


Ntitia = Ntitia 

—= Nuit = Ntit3 

=> Ntitig = Nti[x*yt3t3], by Equation 5.5. 
—> Ntytyg = Naty[ty]? 41403 

=> Ntitia = Nt3t5t3 

=> Nit = NB 

—> Ntyty = Ntigts 

Also, 

Ntytio € [110] 

—> N[tytio]¥" € [110] 


= > Ntigts € [110]. 
Thus, Ntyti4 € [110]. 


One symmetric generator will go to [1 10]. 


Ntytis = Nt, t® = Nt? = Nt7 € [1]. 


One symmetric generator will go to [1]. 


Ntitig = Ntitie6 
== Nithie = Nits 


=> Ntitig = N[yttts°|t8, by Equation 5.5. 


=> Ntitig = Nt}oth 
= Nititie = Ntiotia 
Also, 

Ntytg € [18] 

—> N[tyts]”” € [18] 
=> Ntygti4 € [18]. 
Thus, Ntitieg € [18]. 


One symmetric generator will go to [1 8]. 


Ntiti7 = Ntyt? = Nt}° = Ntig € [is 


One symmetric generator will go to [1]. 


Ntytig = Ntytig 
=> Ntitis = Ntit3 


=> Ntitig = N[yt}ts°|#3, by Equation 5.5. 


=> Nijtis = NES 
=> Ntitis = Ntigtie 
Also, 

Next € [16] 

—> N[tytg]”” € [16] 
=> Ntiotie € [16]. 
Thus, Ntitig € [16]. 
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One symmetric generator will go to [1 6]. 


Ntitig = Ntt}9 = N € [x]. 
One symmetric generator will go to [*]. 
Ntyto9 = Ntytoo 

=> Ntito9 = Nt,th° 

=> Ntitoo = N[yt}td]t4°, by Equation 5.5. 
== Nig = NE 

= Ntiteo = Ntistis 

Also, 

Ntyta € [14] 

—> N{tyta]®” € [14] 

=> Ntigtig € [16]. 

Thus, Ntitoo € [14]. 


One symmetric generator will go to [1 4]. 


Word of Length 2 


N(4) = Coset Stabiliser in N of Nt,ta = {n € N|(Ntyta)” = tyta}. We will look for 
a relation that will increase the Coset Stabiliser N(4). 
Ntit2 = Ntig, by Equation 5.5 

=> Ntt2 = Nt}? 

=> Ntjtetz = Nt}°te 

=> Nit? = Nitto 


= Ntyt4 = Ntigte 


Since, (Ntit4)® = Ntita > € € NO@4) | and 
(Ntyta)™” = Ntigte = Ntit4 > pe N(G4) then, 


N(4) — Coset Stabiliser in N of Ntyta = {n € N|(Ntyta)” = tyta} = {e, 2°}. 


IN|_ _ 20 _ 49 


Furthermore, the number of single cosets in Nt,t4N is way] = 3 
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We find the equal names by conjugating tyt4 ~ ti9t2 by elements of N. 


tila ~ tigtig tstie ~ telis tgti1 ~ totia 
tat ~ tigtis tiets ~ liste tiitg ~ tiatg 
tat3 ~ ti7teo trti2 ~ tiotis 
tgta ~ tooti7 tiat7 ~ tistio 


N(6) — Coset Stabiliser in N of Ntyts = {n € N|(Ntite)” = tite}. We will look for 
a relation that. will increase the Coset Stabiliser N°. 
Nt tg = Ntite 

=> Ntite = Ni t3 

=> Ntite = Nti[yx*t§tt], by Equation 5.5 

—> Ntyte = Nyx [ty]! t8t7 

=> Nitp = NBCU 

— Ntits = Nt&ti 

= Nits = N[yx?t3t$]t{, by Equation 5.5 

=> Nite = NB? 

=> Nt te = Ntiotg 


Since, (Ntitg)* = Ntitg > e € N@®), and 

(Ntits)” ¥ = Ntioto = Ntits > z4y € N“9), then, 

N(S6) — Coset Stabiliser in N of Ntitg = {n € N|(Ntitg)” = tite} = {e, vty}. 
Furthermore, the number of single cosets in Nt ,tgN is Nosy — 2 = 10. 

We find the equal names by conjugating tite ~ tiotg by elements of N. 


tite ~ tioto tztia ~ tietig tiitig ~ tootis 
tet ~ tizts tyat3 ~ lista tioti ~ tigtie 
tats ~ totio trtig ~ tgti7 

t5t2 ~ tigt7 tigt7 ~ t5te 


N(8) — Coset Stabiliser in N of Nt,tg = {n € N|(Ntitg)” = tits}. 


We will look for a relation that will increase the Coset Stabiliser N“®). 


Ntit2 = Ntig, by Equation 5.5 
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=> Ntyt2 = Nt}? 

=> Ntitet} = Nt{°ts 

=> Ntyty = Nt}°ts 

= NtytS = N° lyrtt§t7], by Equation 5.5 
—> Nt, tt = Nyx [t}0}ye" 2827 

SS Nitin = Nee 

—> Nits = Nt! 


=> Ntjtg = Ntoaotis 


Since, (Ntitg)° = Nt,tg > e € N“8), and 
(Ntitg)" ¥ = Ntaotig = Ntytg > xy € NGS), then, 
N(8) — Coset Stabiliser in N of Nt,tg = {n € N|(Ntitg)” = titg} = fe, xy}. 


Furthermore, the number of single cosets in Nt tgN is aay = » = 10. 


We find the equal names by conjugating titg ~ taot13 by elements of N. 


titg ~ tooti3 tgt4 ~ tiots tiatig ~ tstio 
tgti ~ tistia tatz ~ tote tetg ~ ti3t20 
tot7 ~ tigtia tiztig ~ tiotis 
trta ~ tietis tisti7 ~ tiitie 


N(@10) — Coset Stabiliser in N of Ntyt10 = {n € N|(Ntit10)” = tyt10}. 
We will look for a relation that will increase the Coset Stabiliser N(!9), 
Ntit2 = Ntig, by Equation 5.5 

=> Ntit2 = Nt}? 

=> Ntitets = Nt}°t5 

—= Nit} = Ntp°ts 

=> Nt1t3 = Nt [xtyt3t8], by Equation 5.5 

—> Nt t3 = Noty[el]}?*44308 

=> Nt t3 = N¢tStste 

= Nib = NBG 


= Ntytio0 = Ntatis 


Since, (Ntit19)° = Ntitip > e € N@!9), and 

(Ntitio)*’ = Ntatis = Ntitio > cy ¢ N@!), then, 

N(10) — Coset Stabiliser in N of Nt,ti9 = {n € N|(Ntit1o)” = titio} = fe, ry}. 
Furthermore, the number of single cosets in Nt t19N is ier = 4 = 10. 


We find the equal names by conjugating tyti9 ~ tati5 by elements of N. 


titio ~ tatis tstis ~ tiets t7tg ~ tatig 
tioti ~ tistia tigts ~ tigtia tgt7 ~ ti1t20 
tatg ~ t3ti6 teti7 ~ tista 
tote ~ tyatis tiz7te ~ tooti 


N12) — Coset Stabiliser in N of Ntyty2 = {n € N|(Ntyty2)” = tyt12}. 
We will look for a relation that will increase the Coset Stabiliser N“1!?), 
Ntit2 = Ntig, by Equation 5.5 

=> Ntite = Nt}° 

= Ntitets = Nt}°t3 

= Ntyt} = Nt}°t3 

=> Ntiti2 = Ntigtio 

Also, 

Ntiti2 = Ntigtio 

= Ntiti, = Ntq°t3 

=> Ntitig = Nt} [yxt$t?], by Equation 5.5 

—> Ntyty = Nyx? [t}0}y?? 4842 

=> Ntiti2 = Nt8t8t? 

=> Niyti2 = Nit? 

=> Ntitio = Ntets 

Also, 

Ntitio = Ntets 
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—= Ntiti2 = Nt3t7 

=> Ntiti = Ni[yx*t8ti|t?, by Equation 5.5 
=} Niitis=NeG 

=> Ntyti2 = Ntietiz 

Thus 

Ntiti2 = Ntigtio = Ntet3 = Ntie6tiz 


Since, (Ntit12)° = Ntity2 > e € N@!2), and 
(Ntyti2)” = Ntigtio = Ntitig > 2° € N@!2), and 
(Ntiti2)!” = Ntets3 = Ntiti2> yx? € N(@12) and 
(Ntity2)"¥ = Ntieti7 = Ntitig > 23y € N42), then, 


N(@12) — Coset Stabiliser in N of Ntt1 = {n € N|(Ntiti2)” = titia} = fe, 2°, yx”, xy}. 


|N| — 20_5 
|N@12)| ==" ags= Se 


Furthermore, the number of single cosets in Nt ,t12N is 
We find the equal names by conjugating tit12 ~ tigtio ~ tet3 ~ tigti7 by elements of 
N. 


titi2 ~ tigtio ~ tet3 ~ tietiz 
tgte ~ tiztie ~ tizt7 ~ testis 
toti1 ~ tootg ~ tots ~ tistis 
tyita ~ toteo ~ tiati ~ tiotig 


trte ~ tists ~ tigtis ~ tats 


The orbits of N“*) on {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20} 
are {1,18}, {2,9}, {3,14}, {4,19}, {5,10}, {6,7}, {8,17}, {11,20}, {12,15}, and 
{13, 16}. 


We want to see to which double coset Nt, tatig, Ntitate, Ntytatya, Ntitata, Ntytatio, Nt tate, 
Ntytatg, Nt tata, Nt tata, and Ntytatie6 belong. 


Ntytatig = Nt,t3t3 
=> Ntytatig = Nt € [1]. 


Two symmetric generators will go to [1]. 


Ntytatg = Nt tte 
=> Ntitate = Ntit3 
=> Ntit4te = Ntyte € [16]. 


Two symmetric generators will go to [1 6]. 


Ntytatia = Nt, t3t§ 
=> Nitytaty4 = Nit? 
=> Ntytatyg = Ntytig € [14]. 


Two symmetric generators will go to [1 4]. 


Ntytata = Nt,t3t2 
=> Nttat, = Nt,t5 
=> Ntitata = Ntitg € [18]. 


Two symmetric generators will go to [1 8]. 


Ntitatio = Nt t3t3 

=> Ntytatio = Ntits 

= > Ntitatio = N[ytt°#]t3, by Equation 5.5 
=> Ntytatio = Nt}e8 

=> Ntytatio = Ntiotia € [110]. 


Two symmetric generators will go to [1 10]. 


Ntitate = Nt t3t3 
=> Ntitats = Ntit3 
=> Ntitate = Ntitio € [110]. 


Two symmetric generators will go to [1 10]. 


Ntytatg = Nt t3t3 
=> Ntitytg = Nt, t$ 
=> Ntytatg = Nite € [112]. 
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Two symmetric generators will go to [1 12]. 


Ntytateo = Nt,t2t2° 

— Ntitatoo = Ntite. 

=> Ntyt4te9 = Ntig, by Equation 5.5 

=> Nttatoo = Ntio € [1]. 

Two symmetric generators will go to [1] 
Ntytatig = Nt,t2t8 

SS Nis — Nats 

=> Ntytatig = N[yt}°te10]t§, by Equation 5.5 
=> Ntitatig = Nt} 

—> Ntytatig = Ntiotia € [18]. 


Two symmetric generators will go to [1 8]. 


Ntitatig = Nt, t3t8 

—> Ntytatig = Nitty? 

=> Ntitatig = Ntitet? 

= Niitatig = Ntigt8, by Equation 5.5 
—> Ntytatig = Ntigtig € [14]. 


Two symmetric generators will go to [1 4]. 


The orbits of N@® on {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20} 
are {1,10}, {2,17}, {3,20}, {4,13}, {5,8}, {6,9}, {7,18}, {11,16}, {12,19}, and 
{14,15}. 


We want to see to which double coset Nt tetio, Nt, teta, Nt tets, Nt teta, Nt tots, Nt tete, 
Ntitetig, Ntitetie6, Ntiteti2, and Ntitgti4 belong. 


Ntytgtio = Ni, t3t3 
=> Ntitetio = N[yt}ots\t§, by Equation 5.5 
=> Nii tetig = Neto 


=> Ntitetio = Ntigtia € [18]. 


Two symmetric generators will go to [1 8]. 


Ntytgte = Nt t3te 
=> Ntitete = Ntt3 
=> Ntitete = Ntytg © [18]. 


Two symmetric generators will go to [1 8]. 


Ntytets = Nt, t3t? 

=> Ntitets = Nti[yx*t8ti]t?, by Equation 5.5 
—> Ntytgts = Nyx [t,]¥™ t8t9 

=> Ntitets = Nt3tst? 

—. Ni; tets = Nit} 

=> Ntitet3 = N[yxt3t?|t?, by Equation 5.5 
=> Ntitets = Nt3ti 

=> Ntitgt3 = Ntioti3 € [14]. 


Two symmetric generators will go to [1 4]. 


Ntiteta = Ntit3t? 
=> Ntiteta = Ntit3 
=> Ntitet,g = Ntytio € [110]. 


Two symmetric generators will go to [1 10]. 


Ntytets = Ntyt3t5 

=> Niitets = N[ytttd°|tZ, by Equation 5.5 
=> Ntitetg = Nt}°r8 

—> Nttgtg = Ntigtie € [110]. 


Two symmetric generators will go to [1 10]. 


Ntitete = Nt t3t3 
=> Ntitets = Nt t8 
=> Ntytets = Ntitie € [112]. 


Two symmetric generators will go to [1 12]. 
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Ntytetig = Nt, t3t3 

—> Ntytetis = Ntite 

=> Ntitetig = Nytt®, by Equation 5.5 
—> Ntytgtig = Ntig € [1]. 


Two symmetric generators will go to [1]. 


Ntytetig = Nt, t3t8 
=> Ntitetig = Nti € [1]. 


Two symmetric generators will go to [1]. 


Ntitetic = Nt1t3¢§ 

=> Ntytetig = N[yt}td|t8, by Equation 5.5 
=> Niitetic = Nt} 

=> Ntiteti2 = Ntigtie € [16]. 


Two symmetric generators will go to [1 6]. 


Ntitetia = Nt t3t5 

=> Ntytetia = N[yt}otd|ed°, by Equation 5.5 
=> Niitetia = Nt} 

=> Ntitetis = Ntigtis € [14]. 


Two symmetric generators will go to [1 4]. 


The orbits of N@®) on {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20} 
are {1,20}, {2,19}, {3,18}, {4,17}, {5,16}, {6,15}, {7,14}, {8,13}, {9,12}, and 
{10,11}. 


We want to see to which double coset Ntytgtao, Ntytgto, Ntyztgtis, Ntitgta, Ntytgtie, 
Nt tte, Ntytgtya, Ntytgts, Ntytgtia, and Ntytgtio belong. 


Ntytgtoo = Nt,t5th° 
=> Nititgteg = Nt t3 
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= > Ntitgteg9 = Ntite € [16]. 


Two symmetric generators will go to [1 6]. 


Ntytgto = Ntit3te 
=> Ntitgte = Nt t3 
=> Ntitgte = Nitin € [110]. 


Two symmetric generators will go to [1 10]. 


Ntytgtig = Nt, t5t2 
=> Ntitgtig = Nt t3 
=> Niitgtig = Ntita € [14]. 


Two symmetric generators will go to [1 4]. 


Ntytgt4 = Nt, t3t3 
=> Ntitgta = Ntit8 
=> Ntytgt, = Nite € [112]. 


Two symmetric generators will go to [1 12]. 


Ntytgtig = Nt, t5t8 

=> Ntitstig = Ntite 

=> Ntitgtie = Nytt®, by Equation 5.5 
—> Ntytgtig = Ntio € [1]. 


Two symmetric generators will go to [1]. 


Ntitgts = Ntit3t3 

=> Ntjtgts = Nits 

—> Ntytgts = N[yttth°|t3, by Equation 5.5 
=> Nijtgts = Nt}°S 

=> Ntitgts = Ntigti2 € [110]. 


Two symmetric generators will go to [1 10]. 


Niitgtia = Nt1t5t5 


=> Nitytgtig = Nt € [1]. 


Two symmetric generators will go to [1]. 


Ntitgtg = Ntyt5t3 

=> Ntytgts = Nit8 

=> Ntytgtg = N[yt}otd|t§, by Equation 5.5 
—> Ntytgtg = Ntt°¢s 

—> Ntytgtg = Ntigtis € [18]. 


Two symmetric generators will go to [1 8]. 


Ntytgtig = Nt,t5t8 

=> Ntitgtic = Ntt3° 

=> Ntytgti2 = N[yt}t4°|t2°, by Equation 5.5 
=> Niitgtic = Nt} 

=> Ntitgti2 = Ntiogtis € [14]. 


Two symmetric generators will go to [1 4]. 


Ntitgtio = Ntit5t3 

=> Ntjtstio = Ntit? 

=> Ntitgtio = N[ytt°t°]t3, by Equation 5.5 
=> Ntitgtio = Nt 

— Ntytgtio = Ntigtie € [16]. 


Two symmetric generators will go to [1 6]. 


The orbits of N@!) on {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20} 
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are {1,4}, {2,11}, {3,8}, {5,12}, {6,13}, {7,16}, {9,20}, {10,15}, {14,17}, and 


{18, 19}. 


We want to see to which double coset Ntytiota, Nt trot, Ntytiots, Ntytioti2, Ntytiote, 


Ntytioti6, Ntitioteo, Ntitiotio, Ntitiotia, and Ntytiotig belong. 


Ntitiots = Nt t3t3 


=> Nttiots = Ntit3 

=> Ntitiots = N[ytt°t]t3, by Equation 5.5 
=> Ntytiots = Nix 

— > Ntitiota = Ntigtie € [110]. 


Two symmetric generators will go to [1 10]. 


Ntitiot2 = Nt tote 
=> Ntitiote = Ntyt§ 
=> Ntitiote = Ntitio € [112]. 


Two symmetric generators will go to [1 12]. 


Ntitiots = Ntit3ts 

=> Ntitiots = Ntit3 

=> Ntitiots = N[ytt°t°]t3, by Equation 5.5 
=> Ntitiots = Nt 

— Ntytipts = Ntigtie € [16]. 


Two symmetric generators will go to [1 6]. 


Ntitioti2 = Ntt3t§ 
=> Ntitioti2 = Nt € [1]. 


Two symmetric generators will go to [1 12]. 


Ntitiots = Ntt3¢3 

=> Ntitiots = Ntit8 

=> Ntitiote = N[yt}°t4°|t8, by Equation 5.5 
=> Nijtiote = Ne} ts 

=> Ntitiote = Ntigtia € [18]. 


Two symmetric generators will go to [1 8]. 


Ntitiotie = Ntt3t8 
=> Ntitiotig = Nt, t3 
=> Nititiotig = Nita € [14]. 
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Two symmetric generators will go to [1 4]. 


Ntitiotao = Ntt3th° 
=> Ntitiotep = Ntt3 
=> Ntytioteo = Ntitg € [18]. 


Two symmetric generators will go to [1 8]. 


Ntitiotio = Nt1t3t3 

=> Ntitiotio = Nt t3° 

=> Ntitiotio = N[ytt°#°]t4°, by Equation 5.5 
=> Ntitiotio = Nt}°t8 

=> Ntitiotio = Ntiotig € [14]. 


Two symmetric generators will go to [1 4]. 


Ntitiotia = Ntit3ts 

= > Ntitiotia = Ntite 

=> Ntitiotia = Nytt®, by Equation 5.5 
—> Ntytiot14 = Ntig € [1]. 


Two symmetric generators will go to [1]. 


Ntitiotig = Ntit3t8 
=> Ntitiotis = Ntt3 
=> Nititiotis = Ntite € [16]. 


Two symmetric generators will go to [1 6]. 


The orbits of NC!) on {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20} 
are {1,6, 16,19}, {2, 7,13, 20}, {3,12,10,17}, {4,15,5,18}, and {8, 9,11, 14}. 
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We want to see to which double coset Ntytyatig, Ntyti2t20, Ntytretio, Ntytyatisg, and 


Ntytyot14 belong. 


Ntytiatig = Nt t8t§ 
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=> Ntitiotig = Ntt3 
=> Niitiotig = Ntite € [16]. 


Two symmetric generators will go to [1 6]. 


Ntytigteo = Nt t$t4° 
=> Ntytiete9 = Ntit3 
=> Ntitioteg9 = Ntitio € [110]. 


Two symmetric generators will go to [1 10]. 


Ntitiotio = NttSt3 
= Ntytyi2t10 = Nt) 
=> Ntitietio = Nti € [1]. 


Two symmetric generators will go to [1]. 


Ntitiot1g = Ntit¢8 
=> Ntytiotis = Ntit3 
=> Niytiotig = Nite € [18]. 


Two symmetric generators will go to [1 8]. 


Ntitrotia = Nt tSts 
=> Ntytiotya = Ntit? 
=> Ntytioty = Ntit4 € [14]. 


Two symmetric generators will go to [1 4]. 


Below is our completed Cayley Diagram. 
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Thus, 
|N | BL se, LSE). oe TEI cs ENT PNG)! te, tc | 

IG s (ix + iway + Tea] * Twasy + Tos + [way + Toa) 1" 
= ela oe 20 20 20 
eo) nae | 2 2 a ae | 
= (14+ 20+10+10+10+10+5) x 20 
= 66 x 20 
= 1320 

G < 1320 


5.3.2 Proof of the Isomorphism 


Table 5.2: Single Coset Action of PGL(2,11) Over Dio 


Label Single Cosets L y ty 

1 N 1 N 1 N 2 Nt, 
2 Nt, 4 Nts 3 Nto 4 Nt3 
3 Nto 13. Nty 2 Nt 21 Netz 
4 Nt3 8 Nt7 5 Nt4 6 Nts 
5 Nt4 3 Nto 4 Nts 23 Ntaty 
6 Nts 120 Nty 7 Nt6 8 Nt7 
7 Nte 15 Ntty 6 Nts 33 Ntety 
8 Nt7 16 Ntis 9 Ntg 10 Ntg 
9 Ntg 5 Nt4 8 Ntz 43. Ntgty 
10 Ntg 20 Ntig 11 Nty 12 Nty 
11 Ntio 17. ~Ntig 10 Ntg 53 Ntioty 
12 Nty 2 Nt, 130 Nt 14 Nt 
13 Nty 7 Nt6 12 Nty = 638) Ntyoty 
14 Ntig 6 Nts 15 Nt 16 Nts 
15 Ntia4 19 Ntig 14 £Ntig 61 Ntegty 
16 Nt15 10 Nto 17 Nt 18 #£Ntiz 
17 Ntig 9 Ntg 16 Ntjs 51 # Ntgto 
18 Nti7 14. Ntigy 19 Ntig 20 #£Ntig 
19 Ntig 21 Ntg 18 Nt 39 Ntistao 
20 Ntig 18 Ntiz 21 Nt 1 N 
21 Nt2 11 = =Ntj 20 Ntig 24 = Ntoats 
22 Ntyt4 25 Ntstg 24 Ntotz 19 #£zNtig 
23 Ntaty 24 Ntots 25 Ntstp 47 Ntgts 
24 Ntot3 29 Ntity 22 Nits 34 Ntots 
25 Ntgto 28 = Ntztjg 23 Ntaty 3 Nto 
26 Ntstig 31 Ntytg 26 Ntstig 58 Nteti7 


i) 
~J 
= 
cay 
a 

we 


30 3 =Netgtiy 27 = =Ntyets 26 = =Ntstie6 


Continued on next page 
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Table 5.2 — Continued from previous page 


Label Single Cosets x y ty 
28 Ntrtig 27 Ntigts 30 Ntetii 60 Nerts 
29 Ntyot7 26 Ntstig 31 Ntytg 46 Nesta 
30 Ntgti 23 = Ntaty 28 Ntrti2 66 Ntste 
31 Nti,tg 22. Ntjt4 29 Ntt7 38 Netrtig 
BS Ntyte 36 Ntstia 34 Ntots 48 Ntirtis 
33 Ntgt 37 = Ntytgs 35 Ntsto 62 Netytyo 
34 Ntats Al Ntjoty, 32 Ntytg 44 Ntoty 
35 Ntsto 40 Ntyti2 33 Ntety 5 Nta 
36 Ntztya 38 Ntztig 39 Ntisteo 17 Neti 
37 Nttats 35 Ntste 37 Ntwts 30 Ntetiy 
38 Nt7rtis 39 Ntiste9 38 Nt7ztig 55 Ntote 
39 Niistoy 34. Ntots 36 Netstig 52 Neytio 
40 Neate 32 Ntte 41 Ntioti, 25 Neste 
Al Ntistiz BB). INiety AC Nts BP Nita 
42 Ntytg 46 Ntst, 44 Ntotr 40 Nettie 
43 Ntgty 47 Ntatgs 45 Ntvtg 50 Netyatig 
44 Ntot7z 48 Nti7tig 42 Ntyitg 54 Ntaty 
45 Ntrto 43 Ntgt, 43 Netgty 7 Nt6 
46 Ntsta 45 Ntytg 47 Ntatzs 41 Ntyoty 
47 Ntat3 44. Ntot7 46 Ntgtyg 64 #Ntats 
48 Nti7tis 51 Ntgto 49 Ntigti7 28 Neérti 
49 Ntigti7 AD Ntits 48 Ntietig 22 . Nigts 
50 Ntyatio 49 Ntigtiz 51 Ntgtg 15 #£Nti 
51 Ntetg 50 = Ntyatig 50 Ntyatig 56 Ntstig 
52 Ntytio 54 Ntgtg 54 Ntotp 57 Ntiets 
53 Ntioti 56 Ntstig 55 Ntgt2 29 Ntyot7 
54 Ntotg 60 Ntytg 52 Ntitio 65 Nesta 
55 Ntgtea 57 = Ntigts 53 Ntioti 9 Ntg 


Continued on next page 
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Table 5.2 — Continued from previous page 


Label Single Cosets x y ty 
56 Ntstig 61 Ntgtr 58 Ntgtiz 27 Ntiets 
57 Ntigts 59 Nti7ts 59 Ntizts 35 Ntste 
58 Ntetiz 55 Ntogt2 56 Ntstig 45 Ntzte 
59 Ntizte 53. Ntioti 57 Ntigts 42 Ntitg 
60 Ntrztg 58 Ntetiz 61 Ntstr 138 Nt 
61 Ntgtz 52 Ntitio 60 Ntytg 37 Netzats 
62 Ntitig 66 Ntsts 65 Ntsts 36 Ntstya 
63 Ntyati 62 Ntitig 63 Nett, 11 Ntio 
64 Ntats 65 Ntsta 66 Ntsts 49 Ntigti7 
65 Ntsta 63 Ntiti 62 Nttig 59 Nti7te 
66 Ntg3te 64 Ntyts 64 Ntgts 31 Netits 


Thus, 

fia) = (24,8516 310,20, 18. 14.6, 12)(3,1387 715,19, 21 17.9.5) 

22, 25, 28, 27, 30, 23, 24, 29, 26, 31) (32, 36, 38, 39, 34, 41, 33, 37, 35, 40) 

42, 46, 45, 43, 47, 44, 48, 51, 50, 49) (52, 54, 60, 58, 55, 57, 59, 53, 56, 61) 

62, 66, 64, 65,63), f(y) = (2,3)(4, 5)(6, 7)(8, 9)(10, 11)(12, 13) (14, 15) 
16, 17) (18, 19) (20, 21) (22, 24) (23, 25) (28, 30) (29, 31) (32, 34) (33, 35) 

36, 39) (40, 41) (42, 44) (43, 45) (46, 47) (48, 49) (50, 51) (52, 54)(53, 55) 

56, 58) (57, 59)(60, 61) (62, 65)(64, 66), and f(t) = (1, 2,4,6,8, 10, 12, 

14, 16, 18, 20) (3, 21, 24, 34, 44, 54, 65, 59, 42, 40, 25)(5, 23, 47, 64, 49, 22, 19, 
39, 52, 57, 35)(7, 33, 62, 36, 17, 51, 56, 27, 26, 58, 45)(9, 43, 50, 15, 61, 37, 30, 
66, 31, 38, 55)(11, 53, 29, 46, 41, 32, 48, 28, 60, 13, 63). 


Nm 


Now < fz, fy, ft >< See. f : G —+ See is a homomorphism, since G acts on 
X ={N, Nt, Nto,...Nt3te¢} with |X| = 66. < fr, fy, fe > is a homomorphic image of 
the progenitor if 

(1) ft has exactly 2 conjugates under conjugation by < fz, fy > and 


104 


(2) < fx, fy > acts on {ft,, fr} by conjugation as S¢e. 

In addition, if the additional relations (yt)? = 1 hold in S¢6, then < fr, fy, fr > is a 
homomorphic image of G. 

Note that | < fr, fy, fe > | = 1320. 

G/Kers = Im 

= G Ker s S Faytas le 

=> |G/Kers| =| < fr, fy, ft > | = 1820 

= '|6|= bs fetysde >| Kerz 

—> |G] > 1320 


But, from our Cayley Diagram we saw that |G| < 1320. 
Hence, |G| = 1320. 


5.3.3 Building a Map 


mdIy= 


{a = athe x € Fi, U {oo}, a,b, c,d € Fy,|ad — bc = 1, equivalently a nonzero square } 


=<a,0,y >, wherrea=axH44+1,6 =a ka, and y=a+>—-1. 
Let us start with our mapping for alpha. 


a:rHiet+l. 


Or04+1=1 
Treil4+1=2 
2H241=3 
3H341=4 
4+>441=5 
5+ 54+1=6 
6464+1=7 
7TH>74+1=8 
8H 8+1=9 


9+>+>9+1=10 
10+ 10+1=11=1 mod 11 


or oo+l=co 


a = (co)(0, 1,2, 3, 4,5, 6, 7, 8, 9, 10) 
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Next, to find our mapping for beta, we will first need to find &. Our nonzero squares 


in Fy, are {1,3,4,5,9}. 


2S1 
97 =A 
57 = 9 
42 —16=5 
57395. = 3 
67 = 36=3 
7=49=5 
8° = 64=9 
9? = 81=4 


10? = 100 =1 mod11 


mod 11 
mod 11 
mod 11 
mod 11 
mod 11 
mod 11 


To find k, we need a nonzero square that generates all of the other nonzero squares. 


Note that 
a= 1 
gi 3 
37 =9 
= 97 =5 
34 = 81=4 


3° = 243 =1 mod 11 


mod 11 
mod 11 


Thus, k = 3. Therefore, 6: x4 +> 32. 


Or 3- 
1H 3- 
2+>3- 
33: 


0=0 
1=3 
2=6 
3=9 


4+53-4=12=1 modll 
5++3-5=15=4 mod 11 
61+ 3-6=18=7 mod 11 
7+>3-7=21=10 mod 11 
81> 3-8=24=2 mod ll 
91+ 3-9=27=5 mod 11 
10++ 3-10 =30=8 mod ll 


om 3-0 =0o 


Table 5.4: 6: 27> 3a 


Qo De Be ABP Ay BO <1 a 
5 A 
0 23:.6 9 TAL? 40 2 5-8. Ge 

B = (00)(0)(1, 3, 9, 5, 4) (2, 6, 7, 10, 8) 

yigry—i 

0+4+ -4 =00 

lH -f=-1-1t=-1-1=-1=10 mod 11 

2+>-5 = -1-:2°1=-1-6=-6=5 mod 11 

34-3 =-1-3°1=-1-4=-4=7 mod 11 

4+4-$=-1-4>'=-1-3=-3=8 mod 11 

5+ -$=-1-51=-1-9=-9=2 mod ll 

64+ -3 =-1-61=-1-2=-2=9 mod 11 
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8H -3=-1-8°-1=-1-7=-7=4 mod 11 
9» —-L=-1.9-!=-1-5=-5=6 mod 11 


10-4 —7% =-1-10°' =-1-10=-10=1 mod 11 


Table 5.5: y: a+ —4 
Os Shy © ee Be cde 20) 18" SE Be 8 10. 80 
5 
co 10 5 78 29 3 4 6 1 «0 


7 = (0,00)(1, 10)(2, 5)(3, 7)(4, 8)(6, 9) 


Now alpha, beta, and gamma generate L2(11). However, since we have PGL(2, 11) 
we must find an automorphism for the element of order 2 which is not normal in 


PGL(2,11). Note that 


a(z)+b _ 140 _ 1 _fe—=1—_-N=13 
dd = oe where ad — bc = 1—0 = 1, is a non-zero square. Therefore our 


mapping for this automorphism will be 


; 1 
aut: x£r+> = 


04 ~=0c0 

lHy=al 

2S S122 S126 S6 
84 5=1-31=1-4=4 
4+9$=1-44=1-3=3 
5 g=1-51=1-9=9 
64 %=1-61=1-2=2 
74H 7=1-71=1-8=8 
8+ $=1-81=1-7=7 
94 ¢=1-91=1-5=5 


104 % =1-107'=1-10=10 
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Table 5.6: aut: rr 4 
0 1 2 3 4 5 6 7 8 9 10 w 
ee a ee ae ee ee ee ee 
co 1 643 9 2 8 7 5 10 O 


aut = (0, co)(2, 6)(3, 4)(5, 9)(7, 8) 


> G<x,y,t>:=Group<x,y,t|x°10,y°2, (x*-l*y)°2,t711, 
> t* (x°-1)=t76, (x*5*t) 72, (yet) 73>; 

> #G; 

1320 

> £,G1,k:=CosetAction (G, Sub<G|x,y>); 

S:=Sym(12); 

alpha:=S! (11,1,2,3,4,5,6,7,8,9,10); 

beta:=S! (1,3,9,5,4) (2,6,7,10, 8); 

gamma:=S! (11,12) (1,10) (2,5) (3,7) (4,8) (6,9); 

> #sub<S|alpha, beta, gamma>; 

660 
> aut:=S! (11,12) (2,6) (3,4) (5,9) (7,8); 
> #sub<S|alpha,beta, gamma, aut>; 

1320 
> P:=sub<S|alpha,beta, gamma, aut>; 
> s:=IsIsomorphic(G1,P);s; 

true 


VV VV 


5.4 Mj, as a Homomorphic Image of 11**:,,(4 : 5) 


Let G & 11**:,,(4: 5) be a symmetric presentation of G given by: 
<2,y,t\*, cyte? y?, yar ys, t}, Y = t4, (x?t¥")3, eet)? yee)? (xt¥")3 >= Mi, 
where N & (4:5) =< 2,y|2*, zyx? y?, y a7 yz >, 

x = (1,2,3,4)(5, 6,7, 8)(9, 10, 11, 12)(13, 14, 15, 16)(17, 18, 19, 20) (21, 22, 23, 24) 
(25, 26, 27, 28)(29, 30, 31, 32) (33, 34, 35, 36)(37, 38, 39, 40), and y = (1, 13, 17, 33,9) 
(5, 29, 37, 25, 21)(6, 26, 30, 22, 38) (2, 34, 14, 10, 18)(3, 11, 35, 19, 15)(4, 20, 12, 16, 36) 
(7, 23, 27, 39, 31)(8, 40, 24, 32, 28). 
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G is of order 7920, and N is of order 20. The number of single cosets is equal to 
“ = a: = 396. In the next section we will show how this double coset enumeration 
of G over (C4 : Cs) can be done by performing a double coset enumeration of G over 


a maximal subgroup, say H, and N. 


5.4.1 Manual Double Coset Enumeration over a Maximal Subgroup 
of Order 120 


We will find a maximal subgroup, M, or a conjugate of M which contains 


f(x), f(y) to perform double coset enumeration. 


> G<x,y,t>:=Group<x,y,t|x°4,x*y°4*x"*3x*y*3, 

> y°3*«x > 3xy*x,t°1l,t*y=t°4, (x7 2*t* (y73)) 73, (x7 3«*t) 78, 
> (yx*xt*x) 5, 

> (x*t* (y*4))°3>; 

> #G; 

7920 

> S:=Sym(40); 

> xx:=S!(1,2,3,4) (5,6,7,8) (9,10,11,12) (13,14,15,16) 
> (17,18,19,20) (21,22,23,24) (25,26,27, 28) 

> (29,30, 31,32) (33,34,35,36) (37,38,39,40); 

> yy:=S! (1,13,17,33,9) (5,29,37,25,21) 

> (6,26, 30,22,38) (2,34,14,10,18) (3,11,35,19,15) 

> (4,20,12,16, 36) 

> (7,23,27,39,31) (8,40,24, 32,28) ; 

> N:=sub<S|xx,yy>; 

> #N; 

20 


> £,G1,k:=CosetAction (G, sub<G|x>); 
> CompositionFactors (Gl); 


G 
| M11 
1 
> M:=MaximalSubgroups (G1); 
> $M; 
5 
pma 


Conjugacy classes of subgroups 


Pe 


Order 48 
Permutation 
Order 48 
Order 120 
Permutation 
Order 120 
Order 660 
Permutation 
Order 660 
Order 144 
Permutation 
Order 144 
Order 720 
Permutation 
Order 720 


Length 165 
group acting on a set 
2 iA; ke 3 
Length 66 
acting on a set 
* 3 -* 5 
Length 12 
acting on a set 
3k Sek Ld 
Length 55 
acting on a set 
#32 
Length 11 
group acting on a set 
2°4 * 3°2 x 5 


group 
2° 3 


group 
2°2 * 


group 
2°4 


of 


of 


of 


Of 


of 


cardinality 


cardinality 


cardinality 


cardinality 


cardinality 
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1980 


1980 


1980 


1980 


1980 


We have found the maximal subgroups of G. We need to find which maximal sub- 


group contains f(x) and f(y). 


> for iin [1..#M] do if f(x) in M[i] ‘subgroup and f(y) in 

for|if> M[i] ‘subgroup then i; end if; end for; 

> for iin [1..#M] do D:=Conjugates (G1,M[i] ‘subgroup) ; 

for> D:=SetToSequence (D); 

for> for j in [1..#D] do if f(x) in D[j] and f(y) in D[j] then i,j; 
for |.for |at>.end. 3.f£;. end for; end for; 

2 22 

5.5 


Using the previous loop, we see that there are 2 maximal subgroups that contain f(z) 


and f(y). 


> #M[2] 
120 
> #M[5] 
720 


‘subgroup; 


‘subgroup; 


Let us first examine subgroup number 2, which is of order 120. We need to use our 


Schreier System to find a representation of this subgroup in words so that we may 
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perform Double Coset Enumeration of G over H. 


> N:=G1; 

> NN:=G; 

> Sch:=SchreierSystem (NN, sub<NN|Id(NN)>); 
> 

> 


ArrayP:=[Id(N): 1 in [1..7920]]; 


for i in [2..7920] do 
for> P:=[Id(N): 1 in [1..#Sch[i]]]; 
for> for j in [1..#Sch[i]] do 
for|for> if Eltseq(Sch[1i])[j] eq 1 then P[j]:=f(x); end if; 
for|for> if Eltseq(Sch[1i]) [Jj] eq 2 then P[j]:=f(y); end if; 
for|for> if Eltseq(Sch[i])[j] eq -1 then P[j]:=f(x*-1); end if; 
for|for> if Eltseq(Sch[i])[j] eq -2 then P[j]:=f(y*-1); end if; 
for|for> if Eltseq(Sch[1i]) [Jj] eq 3 then P[j]:=f(t); end if; 
for|for> end for; 
for> PP:=Id(N); 


for> for k in [1..#P] do 

for|for> PP:=PP*P[k]; end for; 
for> ArrayP[1i]:=PP; 

for> end for; 

> D:=Conjugates (G1,M[2] ‘subgroup) ; 
> D:=SetToSequence (D) ; 

> £(x) in D[44] and f(y) in D[44]; 
true 
> for g in D[44] do if sub<D[44]|f(x),f(y),g> eq D[44] then gg:=g; 
for|if> end if; 

for> end for; 

> Order (gg); 

2 

> if Order(gg) eq 2 then for i in [1..7920] do if ArrayP[i] eq gg 
if|for|if> then Sch[i]; end if; end for; end if; 

KX * yw t * X°2 *« y°-l *« t°-1l * y*-l 


Thus our maximal subgroup is H =< x,y, cytx?y*ty4 >. 
We show how this double coset enumeration of G over (C4 : C5) can be done using a 


double coset enumeration of G over H and N. 


Definition of a double coset: HwN = {Hwn|n € N}. 


1 


Note: wn = nn wn = nw”. 


So, Hun = {Hw"|n € N} 


First we will expand our additional relations. 


cytazyt yt € H 

ryt a7 ys toy? € H 

cyte? yt t37y4 CH 
ry|e7a 7 ]t 127 y4t37y* € H 
tyr? (x *t27]y4t37y* € H 
wyatt |y*tsry! € H 
aya’ [t3)y*tazy* € H 
p| 


ayx[y*y“ltsy4ts7y* € H 


cyx’y*[y~‘t3y*|ts7y* € H 


4 
cyxy*[t |ts7y* € H 
ayry tists7y’ € H 
cya? y*y*y“}tistsry* € A 


ryr?y*y* ly “tists7y* CH 


cya2y? [ty ty, € H 
tyr’ ytigte9 € H 
Heryz’ytigt29 = H 
Hayx*y* tte =H 
Hays? y ttt} = At 
Hayx?y*t3 = Ate 
Hayx*yt19 = Hto 


Atig = Htg 
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(5.6) 


(a?t")> = 


(att)? 

(x7t33)° 
£7t3307t3327t33 

a? (72 *)tgga7t3g07t33 


xx? (a *t33x")t33a7t33 


x 2 
t33 (330 t33 = 


tg5t33xt33 
t35 (27a *)t33a°7t3s 
t3507(a "13307 )tg3 
typn tt ata 
t352° tg5t33 
(272 *)t35a°tgsts3 


x(a *t35a7)tg5ts3 


2,0 
v°t35 t35t33 = 


2 
x°t33t35t33 = 
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(5.7) 
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(xt)? =€ 
(wtf)? =e 
(ato)? =e 


rtgxtoxto = € 


a(xa+)tgrtoxty = 


| 
ay 


Dea 
# (e-"to@ \tonitg =e 
(5.8) 


| 
o 


rtd toxty = 
x tiotoxto =e 


x*(xx~)tiotgrtg = 


| 
© 


x (x~!)tyotox)tg = 6 


x [tioto|"to = e 


tii tiots =e 


Our first double coset, HeN = {He"|n € N} = {H}, which we will denote by [x]. 
The orbits of N on 
{1,2,3,4,5,6,8,7,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28, 
29,30,31,32,33,34,35,36,37,38,39,40} 

are {1,2,13,3,34,14,17,4,11,35,15,10,18,33,20,12,36,19,16,9} 

and {5,6,29,7,26,30,37,8,23,27,31,22,38,25,40,24,28,39,32,21}. 

We will take a representative from each orbit, say t; and ts, and determine to which 


double coset Ht, and Hts belong. 
Word of Length 1 


Ht,N is a new double coset which we will denote by [1]. 

Ht|N = {HAt,"|ne€ N}. 

Since the orbit {1, 2, 13, 3,34, 14, 17, 4, 11, 35, 15, 10, 18, 33, 20, 12, 36, 19, 16, 9} contains 
20 elements then 20 symmetric generators will go to the new double coset [1]. 

Now N@) > 1. 

Ni = {el 


N = Coset Stabiliser in N of Ht; = {n € N|Ht? = ty}. 


We will look for a relation that will increase the Coset Stabiliser N“). 


Atig = Hty, by Equation 5.6 


1 


[Htig|*¥ * =| [Eig |te = 
=> At, = Atys5 


Now, since Ht® = Ht; > e € N“), and 


Hi? = Htys = Ht 


xyt € N@), then, 
N®) = Coset Stabiliser in N of Ht, = {n € N|Ht? =t1} = fe, x7y*}. 


Furthermore, the number of single cosets of Ht, N is IN| _ 20 _ 


|N@ | ~~ 2 


Conjugating by elements in N gives us the following equal names. 


ty ~ t15 
to ~ ti¢6 
t3 ~ tig 


ta ~ tha 


Therefore, At,N = {Ht = Atys, Ht = Ht16, Hts = Atyi3, Ht4 = Ata, 
Htg = Hti9, Htio = Ht, Wty, = Hty7, Wty. = Htyg, Ht33 = Ht35, Htz4 = Ht36} 


tg ~ tig 133 ~ t35 
tig ~ tao t34 ~ 036 
ti ~ C17 
tia ~ tig 


HtsN is a new double coset which we will denote by [5]. 


HtsN = {Ht®\n € N}. 
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Since the orbit {5,6,29,7,26,30,37,8,23,27,31,22,38,25,40,24,28,39,32,21} contains 20 


elements then 20 symmetric generators will go to the double coset [5]. 


Now N@) > H®. 
N® = fe}. 


N©) = Coset Stabiliser in N of Hts = {n € N|Ht? = ts}. 


We will look for a relation that will increase the Coset Stabiliser NV). 


Atig = Htg, by Equation 5.6 
Hea He 

— Hii} = He 

—= At3t} = Ht} 

=> H[ryxt$] = Ht§, since by Equation 5.7 
x t33t35t33 = e, by Equation 5.7 
[xtastsstas]® ¥ = [e]”Y 

—> xr’ ytigtotig = e 

=> oral SY ae =e 

= ay t3tft3t3 = tS 

=> ay tts = ie 

Hayaxt8 = Ht® 

= HAt§ = Ht 

=> Hto3 = Ato, 

=> [Hto3|” 9 = [Htoi |” 4 


=> Hts = Hto7 


Now, since Ht = Hts > e € N©), and 
mee Hto7 = Hts > xy? € NO), then, 


N®) = Coset Stabiliser in N of Hts = {n € N|Ht? =ts} = fevary?t. 


Furthermore, the number of single cosets of Ht; N is 


After conjugating by all the elements of N, we have the following equal names. 


ts ~ ta7 tai ~ t23 
te ~ tog too ~ tea 
t7 ~ to5 ta3 ~ tai 
tg ~ t26 tag ~ t39 


|N| 


= 2=10. 


[ING] — 2 


t30 ~ tao 
t31 ~ t37 


t32 ~ t3g 


Therefore, AtsN = {Hts == Ato7, Ht = Ato, Ht7z = Atos, Htg = A ty6, 
Hto, = Hto3, Htog = Hto4, Htog9 = Htz9, Ht39 = Htao, Ht31 = Ht37, Ht32 = Ht38} 
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The orbits of N on 
{1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34, 
35,36,37,38,39,40} 

are-{1,15}, {2,36}, {3,9}, {4,18}, {5,31}, {6,28}, {7, 21}, {8, 38}, {10, 20}, 411, 33, 
{12,14}, {13,19}, {16,34}, {17,35}, {22,40}, {23,25}, {24,30}, {26,32}, {27, 37}, 

and {29, 39}. 


We want to see to which double coset Ht,t,, Htito, Htits3, Htyt4, Htit5, Htite, Htit7, Htyts, 
Atytio, Atty, Atitiya, Ht1t13, Atti, Atiti7, Htyte2, Atytes, Htyte,, Htyt32, Htyt37, 
and Htjtg9 belong. 


Att, = Att, 

= Htyt, = Ht 

— Att, — Hts 

=> Ht,t, € [5], since Hts is in [5]. 


Two symmetric generators will go to [5]. 


Ht t2N is a new double coset which we will label [1 2]. 


Two symmetric generators will go to [1 2]. 


Htit3 = Htyts 

=> At,t3 = Atys5ts3, since Hty = Aty5 
Htyt3 = Htists 

=> Htit3 = Ht}ts 

=> Htyt3 = Ht3 

=> Ht tz = Hty9 

=> Htitsz € [1], since Htyg is in [1]. 


Two symmetric generators will go to [1]. 


Ht,t4N is a new double coset which we will label [1 4]. 


Two symmetric generators will go to [1 4]. 
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Htits = Htits 

= Hits = Hie 

= AhigS Ae 

=> Htits = Hto 

=> Htits € [1], since Htg is in [1]. 


Two symmetric generators will go to [1]. 


Ht teN is a new double coset which we will label [1 6]. 


Two symmetric generators will go to [1 6]. 


Htyt7 = Htity 

=> Atyt7 = Atist7, since Hty = Aty5 
Htit7 = Htyst7 

=> Htit7 = Ht3t2 

=> Htit7 = Ht 

=> Ht ty = Hto3 

=> Htyt7 € [5], since Ht3 is in [5]. 


Two symmetric generators will go to [5]. 


Htitg = Htitg 

=> Atitg = Atis5tg, since Hty = Aty5 

Htytg = Htists 

= Htyts = Ht3ty 

=> Htytg = Ht}{x~tytat{], since by Equation 5.8 
ztitioto = e 

[z3tiitiote]Y 7 =e% * 

— x lytaetizts6 = € 


=F Hint, =< 


Sa Wnt 
= ist Se 
Htytg = Ht§a—ytott 


—> Httg = Ha-y[t4]* ‘Ytot4 


=> Attg = Ht3tett 

=> Atitg = Het, 

=> Atitg = H[xyt$t?|t4, since by Equation 5.8 
xt toto =e€E 


Sai = 
[x*tiitiote]®” ¥ =e" ¥ 


1 


-1 


—= y lx trats3tzo = € 
ap a Wee Se 
=> yo ta tot tats = tt 
=> yo ta atte = the 

=> zyy a 't9 = wytht? 

S45 Saye 

Httg = Hryt?t?tt 

=> Htits = Atyty 

=> Htytg = Ht [rly 1t4t8], since by Equation 5.8 
zt tioto = e 

[x ty ty0to]Y =e 

=> ay tisteitiz =e 

= erty isis =e 

=> aly legtgtit? = tf 

= ey tate = if 

Atytg = Ht§a7*y~*t3t3 

=> Htyts = Hoty e§yr 'Yt448 
=> Hits = Ht3t3t3 

=> Htitg = Ht3t3 

=> Htitg = Htogtsa 


Note that 

Atte = Htit¢ 

=> Htyte = Htits 

=> Atitg = Atys5te, since Ht, = Aty5 
Atte = AHtis5te 

=— Hits = At3t5 
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=> Atte = H[yxt$t3|t2, since by Equation 5.8 
Zt tiotg = e 
[x*titiote!” = eF” 

=> aly tistzati7 = € 

= ay ate =e 

=> aly gtgeeee = 18 

> a ty tat = tft] 

=> yey at; = yathty 

=> aa = yatot? 

Htytg = Hyxt?t2t? 

= Hite = Athts 

= > Htite = Ht§t5, since Hte1 = Ht 

=H Sat 

Htits = Ht3ts 

=> Htits = Ht8[xyt9t7], since by Equation 5.8 
zt; toto = e 


Si = 
[x*tiitiote]” ¥ =e" ¥ 


1 


-1 


=> y"'xltrats3tz0 = € 
Say a Wey Se 

= yo ta eget tats = tt 
= ya petty = ett 
=> ayy Pets = cythtt 
= Say 

Htite = Ht§xyt$t? 

=> Htits = Hey[t$]t8t? 
=> Hite = HEH 

—= Htit6 = Htjt} 

=> Htite = Ht3t?, since 
Htiotig => Ht? = HB 
Htyte = Ht5t] 

=> Atte = H[ry~'t4t}|t?, since by Equation 5.8 


xt11tioto =e€E 


[x tyitiote]™ ¥ =e" 
—= yx “tistitie = € 
=> yo lBtit4 =e 
—> yar t5titgt] = tf 


=> yo t3ttt° = tft}? 


= oy ye oy 
= B = mae O 

Higa Hay Pe 

=> Htytg = Atity 

=> Htitg = Htogty 


=> At,tg = Htet,, since Htg = Htog 


Htyte = Htgty 


Thus, 

Atyts = Hto3t34 

=> Ht tg = Htz4to3, since by Equation 5.9 
Htite = Htet, 

==> [Htyte]"Y = [Htety|*Y 

==> Htza4to3 = Htogtsa 

Htytg = Hts,to3 

=> Htytg € [16], since Ht34t23 is in [1 6]. 


Two symmetric generators will go to [1 6]. 


HtytioN is a new double coset which we will label [1 10]. 


Two symmetric generators will go to [1 10]. 


Htity = Htity 

=> Atty = Aty5t11, since Ht, = Hty5 
Atyty, = Atysty 

= Ahitn = Bist 

=> Htyty = Ht 
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(5.9) 
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=> Atty = He, 
=> Atty = Htoz 
=> Htyt, € [5], since Htg7 is in [5]. 


Two symmetric generators will go to [5]. 


Hit = Htiti 

=> Atyty4 = Ati5t14, since Ht, = Hts 

=> Htyty = Ht3ty 

=> Atity,= Ht3 [xyt$t?], since by Equation 5.8 
zt tito = e 


ea = 
[x*tiitiote]” ¥ =e" ¥ 


1 


-1 


— > y ‘a7 tata3teo = e 
=> ya a = 
=> ya tt tate = tt 
=> yo ta tity = ttt 

=>? ayy "tS = cytht 

S45 = myitt 

Hihtin =AGcye 

=> Hist = Haylt9]4tbe? 

=> Htyti = Htpeot? 

—= Htitia = Heit} 

=> Atyty4= Htot?, since 

Htz = Hti¢ 

= Hig Hi, 

Htyti4 = Htgt? 

Atyti4 = H[y~tat?t{]t?, since by Equation 5.8 
rtitioto = e 

[xty, toto)” 7 =ey ie 

= «lyt2ti3t36 = € 

= 47 ‘yt =e 

=> xolytet tht] = ty 


=a yt Hath 


123 


= y ‘vx lyte = pea 

5 Sy att 

Htitig = Hy at2tit? 

—= Htitia = Hezt} 

=> Atyty4= Ath, since 

Hts = Htog 

=> Hi? — Ht 

Htytya = Ht5t} 

Htyty = Ht3[xyt4°t$], since by Equation 5.8 
ti tiptg = e 
[x3ty,tyote]” =e" ¥ 


17 lt33taot3 = e 


=> Y 
=> y a ets =e 

=> y~ tal tp titst,” = t3° 

> yo ta egth = 039th 

= ayy eT = cyts tf 

SS Say a 

Attia = Hay[t5]?¥t3 ty 

=> Hit = Hay[ts]?9eheg 

=> Htytyg = Heeb e8 

=> Hit = ABE 

=> Htiti4 = Atgstea 

= > Atti, € [16], since Htg5t24 is in [1 6]. 


Two symmetric generators will go to [1 6]. 


Htit13 = Atytys 

=> Atitis = Att} 

=> Htyti3 = Ht 

=> Atiti3 = Hti7 

=> Htyti3 € [1], since Hty7 is in [1]. 


Two symmetric generators will go to [1]. 
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Htytig = Htitis 

=> Htitie = Att} 

=> Htitig = A[xylt2t{]t4, since by Equation 5.8 
zti1tiot9 = e 

[x tutiots]” 4 = er Y 

=> yx “tyt16t35 = e 

= yo 1t1t4t3 =e 

> ya ty tpt3t3 = 13 


=> ya ty tat] = t3t) 


Say yr ya ay ae 

= 4H 99 1 e) 

Htytig = Hay 421 t4 

=> Htitig = Ht? 

— Htit\6 = Hty 

=> Htytig € [5], since Ht7 is in [5]. 


Two symmetric generators will go to [5]. 


Htyti7 = Atiti7 

=> Htyti7 = Att} 

=> Atiti; = Ht 

= Atti; = Ht 

=> Htyt17 € [5], since Ht, is in [5]. 


Two symmetric generators will go to [5]. 


Htytog = Ht tos 

= > At teog = Ht15te, since Hty = Hts 

Ati te2 = Htiste2 

= Htito. = At3ts => Htitoo = Hlyxt$t3]t§, since by Equation 5.8 
rti1tot9 = e 

[x3 tri toto” =e 
=> z-1yltistsati7 = e 


= ety aia: =e 
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=> a ty egtgete? = tf 
=> aly t3e3ti = tty 
=> yoo ets = yatSt? 

= in = yxt®t? 

Htyteg = Hyxtt2t8 

= Htyte = Ht} th 

=> Htyte = Ht® jee, since by Equation 5.8 
rtiitioto = e 

[xtritiote|” = e* 

— > ¢~totitip =e 

Sa Se 

> «44 t3t5t5 = £5 

Se tte =e 

Atytoo = Ht§a\t3t3 

=> Htyto. = Ha [¢9]"'t33 

=> Htyto. = Hthtjt} 

=> Htyto. = Htht} 

==> Atite2 = Atsetiu 

=> Atyteo = Htg4ti1, since Hts, = Htz6 

Atyto2 = Atzaty, 

=> Htjte2 € [12], since Ht34t11 is in [1 2]. 


Two symmetric generators will go to [1 2]. 


Htit25 = Htyto5 

—> Htytos = Htyt! 

=> Htites = Ht8 

=> HAtite5 = Htog 

=> Htjte5 € [5], since Htgo is in [5]. 


Two symmetric generators will go to [5]. 


Atyto4 = Atyto4 
=> Ais = Ati 
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=> Htitoa = Hey t3t{]t§, since by Equation 5.8 
zti1tot9 = e 

[x ty, tote)” # = ey 

== yx “ti tiets5 = e 

= yo ttt 08 =e 

> yoo lt tgt3ts = 03 


Se ee He, 


= ayn ye ty = oy 3th 

SS Saye 

Htyt39 = Hay "37 t§ 

=> Hija = Bag ke 

= Htytos = Ht3t} 

=> Htito, = Ht3[x~ytett], since by Equation 5.8 
xty1ti9t9 = € 

[x3tutiote]Y = =ey 2 

= xl ytoti3ts6 =e 

=a wisi] =e 

=> al ytetitfty = ty 

—> x lytott = 3 

Hite, = Ha ytott 

—> Htytoa = Hx~1y[t2]" “Ytot4 

=> Hty toy = Ht tet? 

—> Htitos, = At3t} 

= Atte = Her since 

Htz9 = Htao 

= Hiei 

Htytoa = Hty°t} 

Htyto, = H[x~!y~'t3t?|t7, since by Equation 5.8 
xt toto = e 
[x3t1ytrotol¥™ = ~= ev 
=> x ly~ttaati7ta =e 


=o yy Bet Se 
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> ty“ Ugtstyt}0 = 110 

= sa a = ae 

HitiveaHe yee 

=> Atyte = Ht3t? 

=> Htitos = Htzatss 

=> Atte, = Htggta3, since Hts, = Htz6 
Atyto4 = Htz6t33 

=> Htjte4 € [110], since Htggtgz is in [1 10). 


Two symmetric generators will go to [1 10]. 


Htyt3o = Htyt39 

==> Hijtas = Hitt 

=> Htitz2 = Alxy¢3t{|t§, since by Equation 5.8 
zti1 toto = e 

[z*tutiote]® 4 =e" ¥ 

== yx “ti tiet35 = e 

= yo tt 1403 =e 

=> ya lt tgt3t3 = 13 


ee Ha 


= wy” tye ‘ty = ay t3th 

StS ay tt 

Htyt32 = Hay 431} 

=> Hits. = HtRt4 

—= Htitz2 = Htzti6 

=> Atit3o = Htostig, since Ht7 = Htos 
Htyt32 = Htostig 

Atyt32 = Htigtes, since by Equation 5.9 
Hits = Htet, 

[Htite]# | = [Htet,]¥* 

==> Atietes = Htostie 

Atitz2 = Htyetes 

=> Ht ts32 € [16], since Hty6t25 is in [1 6]. 
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Two symmetric generators will go to [1 6]. 


Htyt37 — Htyts7 

=> Atyt37 = Ht, t}° 

=> Ht \t37 = He 

= > Htts7 € |x], since He is in [*} 
Two symmetric generators will go to [*]. 
Ht te9 = Hty tag 

=> HAtyteg = Ht, t? 

=> Htito9 = Ht} 

=> Atitog = Ht33 

=> Htytag € [1], since Ht33 is in [1]. 


Two symmetric generators will go to [1]. 


The orbits of N®) on 


{1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34, 


35,36,37,38,39,40} 

are {1,35}, {2,12}, {3,17}, {4, 14}, {5,27}, {6,24}, {7,37}, {8, 30}, {9, 19}, {10, 36}, 
{11,13}, {15,33}, {16,18}, {20,34}, {21,39}, {22,28}, {23,29}, {25,31}, {26, 40}, 
and {32, 38}. 


We want to see to which double coset Ht5t,, Htste, Ht5t17, Htsty4, Ht5ts5, Ht5tg, Ht5t37, Atst30, 


Htsto, Ht5ti0, Ht5t13, Ht5t33, Ht5tig, Ht5too, Htste1, Hts5teg, Ht5to9, Htstes, Htste., 
and Htst32 belong. 


Htst, = Httt 

=> Hist at 

— Htst; = Ht 

=> Htst, € [1], since Htg is in [1]. 


Two symmetric generators will go to [1]. 
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Htsto = A tito 

=> Htstz = H[y~!x~!¢3t3]t2, since by Equation 5.8 
rti1 toto = e 

[xt itiote]Y | =e" 

—> x ly ltt 4t33 = € 

Say Bee Se 

oly sth = 8 

= ay a Sa 

Htst2 = Hy 1x7 1t3thte 

=> Htst2 = Ht3t3 

=> Htsty = Htstig 

=> Atste = Hti3t1g, since Ht3 = Hty3. 
Htsto = Htistig 

=> Htste € [110], since Htig3tig is in [1 10]. 


Two symmetric generators will go to [1 10]. 


Htsti7 = Ht3t? 

=> Htsti7 = Hti 

=> Htsty7 = Htos 

=> Htsti7 € [1], since Htg5 is in [1]. 


Two symmetric generators will go to [1]. 


Htsti4 = Htstia 

=> HAtsti4 = Hto7t14, since Hts = Hto7 
Htsti = Htorta 

=> Hts5ti4 = Hty4to7, since by Equation 5.9 
Htitg = Htet, 

=> [Htyt]’* = [Htet,|” 

=> Htyate7 = Htoztia 

Htstig = Htyato7 

= > Htst 14 € [16], since Ht,4t7 is in [1 6]. 


Two symmetric generators will go to [1 6]. 
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Hist = Hie 

=A AG 

=> Atsts = Hty3 

=> Htsts € [1], since Hty3 is in [1]. 


Two symmetric generators will go to [1]. 


Htstg = Atits 

=> Htstg = Ht?[x~ty~1t4t4], since by Equation 5.8 
z ty tito = e 
[xty,tyote]” 7 =e" * 

=>? x ty ltatist3a =e 

=p lattes Se 

=> aly t4t3t8t3 = t3 

=e yn ta 

Atste = Ha ly htath 

—> Hists = Hay) [e2]" 9 t4t4 

=> Htsts = Htitat3 

—> Htste = Atit3 

=> Htsteg = Hie since 

Ht32 = Ht3 

ie = is 

Htstg = ty ts 

=> Htsts = H{x~yt9t3|t$, since by Equation 5.8 
ti tiptg = e 

[xtritiote]¥” = e 

=> x lytzetigte = € 

=> xl ytft8to =e 


— > a lyt2tBtet,® = t3° 


= al ytht3 = a 
Hip = He yee 
=> Htstg = Hee 


=> Htste = Htggt3s 

=> HAtstg = Htz4t35, since Ht34 = Ht3¢6 
Atstg = Atzat35 

=> Htstg € [110], since Ht34tg5 is in [1 10]. 


Two symmetric generators will go to [1 10]. 


Htst37 = Ht?t}° 
=> Atst37 = At, 
=> Htsts7 € [1], since Ht, is in [1]. 


Two symmetric generators will go to [1]. 


Htst30 = Ht7th 

Htst39 = H[y~tx~'t3t3]t§, since by Equation 5.8 
rti1tot9 = e 

[x3ti trot” =e 

= x ty tt ats =e 

=a ly gist) =e 

=> aly ltstgtttt = tf 

— > oly 3 =e 

Hisisg = Hy ah iaih8 

=> Atst3o0 = Ht3te 

=> Htstao € [14], since Htg3te is in [1 4]. 


Two symmetric generators will go to [1 4]. 


Hsig= Hah 

= Aig =e 

=> Htstg = Hti7 

=> Htstg € [1], since Hty7 is in [1]. 


Two symmetric generators will go to [1]. 


Htstio = Ht?t3 
Htstio = H[y~tx~t3t3]t3, since by Equation 5.8 
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xt toto =e€E 
[x ty tio0to]Y = ev 
=> x ly~ltgtyats3 =e 


Seige teil, Se 


=> aly ht3tgtitt = tf 

= aly ttt = i 

Htstig = Hy !ax~t3t5t3 

=> Htstio = Ht3t5 

=> Htstio = Htgto6 

=> Atstio = Htigtog, since Hts = Hty3 
Htsti9o = Ati3t26 

=> Htstio € [16], since Ht13¢9¢ is in [1 6]. 


Two symmetric generators will go to [1 6]. 


Htstis = Ht?tt 

=> Htsti3 = Ht? 

—> Htst\3 = Hto, 

=> Htst13 € [5], since Ht) is in [5]. 


Two symmetric generators will go to [5]. 


Htst33 = Ht?t$ 
=> Htst33, = H 
=> Htsts33 € [x], since He is in [*]. 


Two symmetric generators will go to |*]. 


Htstig = Att; 

Htstig = H[y~tx~tst3]t3, since by Equation 5.8 
rti1tot9 = e 
[x3ty1tioto]¥ | = e% 


=> x tyltgt ats =e 


o 


=> tar ait = 


=> a ty ltgtitii? = 


= aly tt3t3 = 

Histig = Hy ‘a t3t53 

=> Hite = AG 

—= Htstig = Htgtz4 

=> Atstig = Htista4, since Hts = Hty3 
Htstig = Hti3tz4 

=> Htstig € [12], since Hty3tz4 is in [1 2]. 


Two symmetric generators will go to [1 2]. 


Htstop = Htity 
Htstoo = Ht? [xythth®], since by Equation 5.8 
2 titiota = e 

[x ty tyote]"” = ety 


1 


= *Y x tootatia =e 


Sg ag ts = 

=> y lan t}tstyts = th 

= yo a tatsta. = t5tg° 
= cyy lath = wythty 
=> 3 = meuyt his! 

Htstoo = Ht?arythtd° 

=> Htstoo = Hay|tt|ryt5t3° 
=> Atstoo = Ht5e5t}® 

=> Htsteo = Ht3t° 

==> Htsteo = Atiots9 

= > Htstoo € [16], since Htiotz9 is in [1 6]. 


Two symmetric generators will go to [1 6]. 


Htsto, = Ht?t® 

=> Htsto, = Ht 

=> HAtsto1 = Ht29 

= > Htsta1 € [5], since Htgo is in [5]. 


Two symmetric generators will go to [5]. 
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Htstog = Htstos 

=> Atsteg = Hte7teg, since Hts = Hto7 

Atstog = Htoztog 

—> Htstog = Atty 

=> Htstog = Ht§ [yx t3ti], since by Equation 5.8 
ztitioty = e 
[x3tytyote]” ¥ =e" Y 

= yar tigtitig = € 

=> ya lt3tt4 =e 

=> yo ti tit] = tf 

= ya t3ty = at 

Htsteg = Ht8yx 1 3ty 

—> Htstog = Hyx—![t3]¥? | t3t, 

=> Atsteg = Ath t3ty 

=> Atsteg = Ht5ty 

==> HAtstog = Atyaty 

=> Atstes = At4ti, since Hty = Aty,4 
Atstog = Htaty 

=> Htstog € [12], since Ht4ty is in [1 2] 


Two symmetric generators will go to [1 2]. 


Histes = HEE 

= > Htste9 = Htt° 

=> Htste9 = Ht37 

= > Htste9 € [5], since Ht37 is in [5]. 


Two symmetric generators will go to [5]. 


Histo = Het 

=> HAtstes = Ht? 

=> Htsto5 = Ht33 

= > Htstes € [1], since Ht33 is in [1]. 
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Two symmetric generators will go to [1]. 


Htstog = Ht{t} 

=> Htsteg = H[y~'x~tgt$]t3, since by Equation 5.8 
ati toto = € 

[x ty, ty0to]Y —ev" 

=> x ty tt ats =e 

=a Bit Se 

==> aly Mtgtgtitt = tf 

=> aly lt3t3 = G 

Htstog = Hy ‘a 'tgtgts 

= > Htstog = Ht3 

=> Htste¢ € [1], since Hts is in [1]. 


Two symmetric generators will go to [1]. 


Htst32 = Htst3o 

= > Htst3o = Hto7tz0, since Hts = Hto7 

Ht5tz32 = Hto7t32 

— Htst3, = Htjth 

=> Htstzo = Ht8[x—'t3t#], since by Equation 5.8 
xtitioto = e 

[x ty, tiote]” =e 

=> x 'tototi2 =e 

= 7 Bl =e 

=> a ebt tit] = tf 
=e Se 

Htsteg = Htfa lise} 

—> Htst39 = Hya—[t3]¥ 1343 
=> Htstzo = Htht3t? 

=> Histo = ie 

==> Htstz2 = Ht3gto 


=> Ht5t3o = Htotgg, since by Equation 5.9 


Htite = Htgt, 

=> [Htyt6|Y = [Ht6ti|Y 

=> Atst3g = Ht aets 

Htstay = Htotss 

=> Htstz2 € [16], since Htotsg is in [1 6]. 


Two symmetric generators will go to [1 6]. 


Word of Length 2 
N(2) — Coset Stabiliser in N of Ht,ty = {n € N|(Ht,t2)" = tyto}. 


We will look for a relation that will increase the Coset Stabiliser N‘ 
Atyts = Htet,, by Equation 5.9 

—> [Htyt6]” = [Htets]” 

=> Htztzg = Htgts 

=> Hist, = Atits 

— Ht3tty” = Htitgtq” 

=> HAtzt, = Htitst,° 


=> Htst4 = Ht2ts|xyxtats], since by Equation 5.7 
[xt3gtasta3]” Y= e™ 

=> ryrtyatyat, = € 

=>? ryxtatsta =e 

=> cyatatstaty” = ty” 

=> ayrtats = 11° 

Htst4 = Ht?ts3[ryxtats] 

=> Htgt, = Haryz[t2ts]*4* tats 

= Atsty = At5ti tats 

=> Atst, = Ht§[yxt4t}|tat3, since by Equation 5.8 
zti1 toto = e 

[x3ty tite] 7 = ery ‘x 
=> x ty lty7tati5 =e 
=e rT its Se 


=> aly Rtatgig = tf 
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Say Mita = tata 
=> yon lye = yatsts® 
=> a = yeti? 

Higts = HiByatetp tats 
=> Hist, = Hya[t§]9*the3 
= Fuji 

=> Ht3t4 = At3t5 

=> Ht3t4 = Htit4, since 
Ht7 = Htos 

— Ais aie 

Ht3t4 = Ht{ts 

=> Htst, = H[x~tyt3te]t3, since by Equation 5.8 
xtytioto = € 

[xty toto)” = ev” 

=> x 'ytigteti3 =e 

= a lyttott =e 

=> xo lyt3tettt] = tf 

= x yt3te = i 

Htztq = Hal yt3tot5 

=> Htgt, = Ht3t3 

=> Htzta = Ht3t3, since 
Ht = Htyg 

SAG ae 

Htst, = Ht3t} => Htsts = Htotis 
—> [Ht3ta|® = [Htotis]” 
= Htyty = Htyyto0. 


Since, Htit§ = Htitg > e € N(@2), and 

Htyt2 Y = Htyytoo = Http > 2?y € NO), then, 

N(2) — Coset Stabiliser in N of Ht,t2 = {n € N|(Htito)” = tito} = fe, xy}. 
IN| _ _ 20 


Furthermore, the number of single cosets of Ht,toN is wey = 2 = 10. 


We find the equal names by conjugating tito ~ t1,te9 by elements of N. 


tytg ~ ti1te0 tigt3a ~ t35ti2 
tot3 ~ tiati7 tyats5 ~ t36to 
tgti ~ tiotig tiztia ~ tigtie 
totig ~ tzt4 tigtis ~ tootis 


Therefore, AtytoN = {Htyte = At, to, Htats = Atyati7, Atty = Atiotig, 
Htotig = Atz3t4, Hti3t34 = Ht35t12, Hty4t35 = Htzeto, Atiztia = Atiotie, 
Atigtis = Htootiz3, Htaati1 = Atigts3, Ht35tio = Htistae6} 


tzati1 ~ tiets3 


t35tio ~ tists 


N(4) — Coset Stabiliser in N of Ht,ta = {n € N|(Htyta)” = tyta}. 


We will look for a relation that will increase the Coset Stabiliser N‘ 


Htyt4 = Htuta 

=> Htyt, = H[xy't3ti]ts, since by Equation 5.8 
rti1tot9 = e 

[z*tutiots]” ¥ = ew Y 

=> yx “ti t16t35 = e 

= ya lt t4t8 =e 

=> yaq't1t9tgt3 = 13 


SS ye i) = 


Sas ye ty Sey, 

—= tf = ay lt2t] 

Hit, = Hay t3tht, 

=> Htyt, = Ht3t} 

=> Htyt4 = Ht3[x~1t3t3), since by Equation 5.8 
xt 1tiotg = e 
[x3tytyote]” =e? 
— > ¢~tototig =e 


So Bite 
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=> a ebtteitg = tf 
SSE at = 

Hite Hee 

—> Htyty = Ha [t2)" BB 
=> Ayu Hees 
SAS aee 

=> Htit, = Htigto 


Also, Atta = Atigtg 
=>? [Htyta]! — [Htisto]Y” 
=> Atigtig = Htit4 


Att, = Htyetig 
=> [Aiea lre* => [Hti6tig9]*¥” 


= > HAtg5ti4 = Htigto 


Att, = Htyetig 
ed [Htita]7% — [Htretig]?" 
= Atigto = Htyt, 


Since, Htit{ = Htita > e € N(4), 

Ht!” = Htigtig = Htyta > yx € NO), 

Htyte! = Htygty = Htyts > cyz! € N“4), and 

Ht ti!” = Htsstia = Htigty = Htits > zyx! € N(4) 


then, 
N(4) — Coset Stabiliser in N of Htyt, = {n € N|(Htyt4)” = tyta} = {e, yr! cy! ryz}. 
Furthermore, the number of single cosets of Htit4N is Naa = a = 5. 


We find the equal names by conjugating tit, ~ tg5t14 ~ tigto ~ tigtig by elements of 
N. 
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tyt4 ~ tg5tia ~ tigto ~ tietig tot36 ~ tiitsa ~ tiots3 ~ tiatss 
tot, ~ t36tis ~ tigtio ~ tisteo t3t2 ~ t33tig ~ taoti ~ tiati7 


tat3 ~ tgatig ~ tizti2 ~ tistis 


Therefore, HtitaN = {Htita = Htg5ti4 = Htigtp = Atictio, 
Htgt, = Htzetis = Htigtio = tistao, 

Atat3 = Htzatig = Atiztio = Atistis, 

Atgt36 = Atyit34 = Atiots3 = Atratss, 

Atz3tz = Ht33tig = Htooti = tratiz} 


N86) — Coset Stabiliser in N of Ht,tg = {n € N|(Htite)” = tite}. 


We do not have a relation that will increase the Coset Stabiliser N°). 


N(6) — Coset Stabiliser in N of Ht,tg = {n € N|(Htyte)” = tite} = {e}. 

Furthermore, the number of single cosets of Ht,tgN is Nay = » = 20. 

Atytg conjugated by elements of N gives us the following cosets in Ht tgN. 

AtiteN = {Htyt¢, Htot7, Hti3t26, Htats, Htotzg, Ht3tg, Ht34te3, Htigt31, Htyate7, Ht17, tz0, 


Hti6to5, Htaote9, Htzete1, Htiots9, Htiet37, Ht33te2, Htiitao, Atistes, Htastes, Htigtse} 


N(86) — Coset Stabiliser in N of Htytg = {n € N|(Htytg)” = tite} = {e}. 


Furthermore, the number of single cosets of Ht,tgN is TNaay = ou = 20. 


N(10) = Coset Stabiliser inH of Atytio = {n € N|(Htyt19)" = tytio}. 


We will look for a relation that will increase the Coset Stabiliser N(@°), 


Htys = Ht, 
=> [Hti5)"Y = (Ht) 
=> Ati = Ati 

= Hie Ar. 
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— Ht} = Ht3t3" 

SSeS Her) 

—= Ht} = Ht3t3 

=> Ht} = Ht3[y~txt{t}], since by Equation 5.8 
xtitioto =e 

[x ty, ty0to]¥” = ev 

=> x yti9tati3 =e 

=a iit Se 

Saye Su 

=> x lyt3toty? = t[t;° 

= yee yt = yeti t7° 

= Sy tate 

He = Hig ett 

— Ht = Hy 'x[t9]y'*47430 

= Hi Ha ts 

— APs =A 

—= Att, = Htjt] 

=> Ht?t, = Ht3(t?t?) 

= Att, = Htytit} 

=> At?to = H[tt3]t?, since 

Atytg = Htyit20 

=> [Htite]* = [Hti1teo]” 

=> Htot3 = Atyet17 

=> Hist = Hie 
Htit2 = Htgt3t? 
= hie Htyt3't3t7 
=> Ht?t. = Hto(th°ts)tst? 
==> Ais = Hig Gaae 
=> Ht}ty = Htet3°t3t} 


=> Ht}te = Htoth?[x7#3¢9]t7, since by Equation 5.7 


2 = 
x*t33t35t33 = e 


2 2 
[vtgstgsts3]” =e? 
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=> x tastagtsn = e 
Sens 

> x7 t3t903t3 = t3 

=o Bt Ht 

Hei = Hit 

— > HtSt, = Hx? [tpt}|*"43 
= Aris Hiatt. 

=> AGis= Hine; since 
Ht, = Ht 

= i= As 

Atht, = Ht3t}°t3 

=> Ht}t. = Alxyt$t7]t}t8, since by Equation 5.8 
ti tiptg = e 


—1,,-1 —1 
[x*tiitiote]” ¥ =e" 4 


1 


-—1 


=> y ta tats3te0 = e 


=> ye ee =e 
=> ya tot tats = tt 
=> yo ta tity = ett 
= ayy a 't5 = xythtt 
S45 = yh 

His = Haye 
—> Hthte = Htjtst3 
= Ali = Ati ty t3t, 
=> Ht}t. = Atti t3[2—yttt9], since by Equation 5.8 
[x3t14t1oto|*Y = et 
= «7lytistsetig = € 
=> al yttiges =e 


> al yt ftht3t§ = 18 


=e y= 
Htfte = Ht tia tytity 
—> Hit, = Ha! [t$t,13]* ‘ve4e9 


—> Ait, = Htgeieseity 


=> Att, = Alay le ty]epese{t, since by Equation 5.8 


rti1tot9 = e 

[x3ty, tote] = = ery *x 
— > gly lty7tati5 = € 

=a ye iat, Se 

— aly tate, = ty 

= gaye Pty = ts 

Htit, = Hamly  thtatqt3ttty 
=> Ht}te = Atpthtgtity 


=> Ht?t, = Ht? [a7y~ 14343} t8t7t2, since by Equation 5.7 


a t33t35t33 = € 
[z2tg3tasta3|” " =e 7 
= xy |tootr0t20 = e 

=> ay ie =e 

> a? y Rts tRtg = tf 

= ey te = 

Heib= Hie y Bawa 


=> Ht ty = Hay "e374 | e5e84409 


—> Att, = Ht3tgt5 tity 

= Atis= Aleit smee 
Ht33 = Ht35 

=> i =i, 

Atht, = Htptyt5tity 


=> Ht} te = H[xytht§]tgt8ttt], since by Equation 5.8 


xt toto =e€E 

2,,-1 2 
[x*t11tite]* ¥ =e" ¥ 
1 


-1 


—= y'altazteot3 = e 
= ea Se 

=> ya titstg? = t3° 
= ya eRe = #3 7th 
=>? Ta ae a = cytz°t§ 


=> t? = xyt3°¢f 
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BGis= HayiY heen 

= Ht}te = Htyt5 tity 

= Hb =A Glee, since 

Ht29 = Ht39 

SH 

Atht, = Htht5 ttt] 

=> Ht} te = H[x*t3]ttt2, since by Equation 5.8 
xt 1tiotg = e 

SS Prer =e 

— # t3t3tft} = tf 

> 2 t3t3t8 = tft§ 

er ee 1S 

HGis = He ett, 

= Ht}te = Ht3ttty 

= Htite = Ht3tst{ty 

=> Ht}te = Htits3ttt?, since 

Htz = Htas 

Hit 

Hts = Atltstiy 

=> Ht}te = Hti[x?ythti]t{t¥, since by Equation 5.7 
[x?tggtasta3]"Y 7 = ety '* 
=> x ytsty3t3 =e 

=> x ytstits =e 

=> a ytstitstz = t3° 
=> x ytgtit] = tyoty 
=> v*yx*yts = x7 yts°tT 
=> 3 = ao ythoet 

HtRty = Hila? ythtietey 
=> Ht, = Hay [tT]? vtht9 
—> Aft, = Ht3°t3°t4 
=> Htit, = Ht3t4 


==> Ati7t2 = Ats5tz6 
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—2 2 
=> [Htizte]!¥ ~ = [Htzstz6]” 
=> Atitio = Htztio 


Conjugating by elements in N gives us the following equal names. 


tilio ~ tgtia tgat35 ~ tooti tigt3 ~ t36t33 
tot ~ tato tiolis ~ tietiz tigta ~ t33¢34 
tistis ~ tiitie tioti3 ~ tratig 
totia ~ tisteo ti7t2 ~ t35t36 


Since, Htit{, = Htitio > e€ € N(@10) | 

Htyt?) = Htgtiy = Atyty) > 2? € N@9), then, 

N(10) — Coset Stabiliser in N of Htitio = {n € N|(Htith, = titio} = fe, x}. 
Furthermore, the number of single cosets of Ht,ti9.N is Tay, = » = 10. 
HtitioN = {Htitio = Htzti2, Htety, = Htato, Htiztig = Htiitie, 

Atgtia = Atistoo, Ht3at35 = Atooti, Atiotis = Atietiz, 

Hty2t13 = Htyatig, Hti7t2 = Ht35t36, Htigts = Htzet33, Htigta = Ht33t34}. 


The orbits of N“?) are {1,11}, {2,20}, {3, 13}, {4, 34}, {5, 23}, {6, 40}, {7, 29}, {8, 26}, 
{9, 35}, {10, 16}, {12, 18}, {14, 36}, {15, 17}, {19, 33}, {21, 27}, {22, 32}, {24, 38}, {25, 39}, 
{28,30}, and {31,37}. 


We will check to see where tytoty, tytote, tyteti3, tytata, tytots, ty tate, ty tatoo, tytate, tytatg, tytotie, 


ty totis, titetia, titeti7, titetss, titetes, titetea, tyteted, titotes, titgtes, and t)tgt37 belong. 


Htytoty = Htytot 

=> Atytety = Atistet, since Ht, = Hts 

= Hijbir= Higoti 

=> Atytot) = Ht§[y—txtteT]t1, since by Equation 5.8 
zty1tiot9 = e 


eal Sena 
[x*tiitiote]¥ 7 =e% * 


=> x tytoti3t36 =e 

=> a yintit? =e 

==> xo yteti tat = ty 

= at ytot itt = tity 

= yen yig=y_ att 

Spy wit 

Htytet) = Htfyat2tity 

—> Hiytot; = Hy a[t4y "74248 

=> Atte: = AEE 

=> Atytet) = Hit} 

=> Htytot) = Hti[x7t3t3], since by Equation 5.8 
xtitioto = e 

—S Pit Se 

—> x7 t3t3titt = tf 

=> 273t3 = tf 

Atytgt, = Htjax°t3t3 

=> Htytet) = Ha [tT] 33 

==> Atytet) = Ht§t3t3 

=> Htytgt) = Ht3°t3 

=> Htytot) = Htzotio 

=> Atytet; = Htiot39, since Hti9t39 = Ht39t10 
=> Htytot; € [16], since Htiotg9 is in [16]. 


2 symmetric generators will go to [1 6]. 


Ht tote = Ht, t3 
=> Atitote = Htyt, 
=> Htytet2 € [16], since Htyt¢ is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Atytoty3 = Atytoty3 
=> Htyteti3 = Htitet} 
= > Htyiteti3 = Aty[y~'at2t7 tt, since by Equation 5.8 
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rt tity = e 

[x7 tyitiote)!” 7) =e 

= x 'ytotists6 = e 

=> x lytotit? =e 

=> xo lytot{tit] = t7 
Saye Si 

Sy ee Yaa ga 
ty Sy att 

Htytotis = Htyy tat2tit4 

—> Atytoty3 = Hy 2[t,|)¥ 72 
=— > Atytoti3 = At3ti 

=> Htiteti3 = Htitt, since 
At29 = Ato 

= Avan 

Htytoti3 = Ht}t? 

=> Atytety3 = Ath 

=> Htytet13 = Hts 

=> Htytet13 € [5], since Htgg is in [5] 


2 symmetric generators will go to [5]. 


Htytota = Htytots 

=> Atytet4 = Ht1,taota, since 
Htytz = Ati; t29 

Atytotsa = Hty1toota 

=> Htytots = Ht3t}t, 

— > Htitot, = Atti 

=> Htytots = Ht? t4, since 
Aty, = Aty7 

=H = 

Htytots = Atty 

=> Htitet,s = H[yxt$t}°|t§, since by Equation 5.8 


xt11tioto =e€E 


-1 -1 
[x*tutiote|*Y * = ety * 


= «ly Miztatis =e 
=> ao ye Seats =e 

=> aly ltitat3ts = tf 
= aly tPtata® = thtg° 
=> yee ee = yats tl? 

= Swat 

Htytots = Hyxctht}pts 

= > Atytots = At3t} 

=> Hty tet, = Ht7t}, since 

Hts = Hto7 

SSS its 

Htytota = Htjt} 

Htytot, = Ht? [rytSt4°), since by Equation 5.8 
x tiitiots =e 


[x ty, t10te]7” = evy 
1 


-1 


=> ylatootstia = € 
—> y lx ttitsts = e 
=> y lanl tjtst3ts = th 
=> yr a “aateta = t5tg° 
= yy et = oye. 
=> a = aytht2o 

Htytot, = Httayt5ts° 
=> Htytot, = Hay[tt]*t5t3° 

=> Htytot, = Ht3t5t3° 

=> Htytets = Ht3t3° 

=> Ht tots = Htyot39 

= > Htytet, € [16], since Htiot39 is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Htytots = Htytots 
=> Anis = Hitt 
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=> Htitets = Ht3tet?, since 

Ht, = Htis5 

= Hi.= Hi, 

Htytots = Ht3tet? 

=> Atytets = Ht3[y'atiti|t?, since by Equation 5.8 
xt toto = e 


[z*tuitiote]” * ore 


-1 


=> x 'ytoti3t36 = e 

Sar yt Se 

= al ytot itty = ty 

= a~lytottt] = tity 

= yar lye = y ett 

=> to =y tatit? 

Htjtots = Higy ‘atitie 

—> Htytots = Hy a[t4]y 4329 

=> HAtytets = Ht}t?t? 

=> Htitets = Atit} 

=> Htitets = H[yx~'t3t,|t?, since by Equation 5.8 
ti tiptg = e 
[x3ty,tyote]” ¥ =e" Y 

=>? yx tigtiti6 =e 

=> ya lt3tt4 =e 

=> yo ti tit] = tf 

= ye hh =th 

Htytyts = Hyx~\t5tyt} 

=> Hijtots = Ht3i{? 

=> Atitets = Htigts7 

=> Atytots = Htyot37, since Htjg = Ht1g 
Htytats € [16], since Hty2t37 is in [1 6] 


2 symmetric generators will go to [1 6]. 


Atytotg = Hty tote 
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=> Htytets = Htyt2t3 
=> Atytets = Ht t3 
=> Htytotg = Htytio 
=> Htytets € [110] 


2 symmetric generators will go to [1 10]. 


Htytoto9 = Htytotog 

=> Htytete9 = Htytot? 

=> Htitote9 = Hthtot®, since 

At, = Atys 

= AnSt 

Htytote9 = Ht3tet? 

=> Htytoteg = Ht3[ytxtitT]t}, since by Equation 5.8 
xty1ti9t9 = e 

[x3tutiotelY = =ey 2 

=> xr 'ytatistss = e 

=a wisi] =e 

=> a lytetitfty = ty 

=> at ytyt ity = tity 

=> yen lyig = y_atitt 

St Sy att! 

Htytoteg = Athy xt3t8 

—> Htytoteg = Hy 2[t4]¥ *t3¢4 

=> Htitote9 = Ht}t3t} 

—> Htytzte9 = Htjt} 

=> Ht tote) = A[yx't3t,|tt, since by Equation 5.8 
x°tiitioto = € 
[xtytyote]” 2 —er'y 
=> yx tigtitie =e 
=> yx lt3tyt4 =e 
—> ya t5tit4t] = tf 


=907 1h =a 
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Htytoteg = Hyx't3tyt? 

=> Htiteteg = Ht3t? 

=> Htytoteg = Htigtiz 

=> Htjtote9 = Hty2t17, since 

Ati = Atig 

Ht tgto9 € [12], since Hty2t17 is in [1 2]. 


2 symmetric generators will go to [1 2]. 


At, tats => ty tots 
= > Atytotz = At, tats 
=> At, tats = Ht, t20tg 


==> Htitots = Histiti 

—= Htitets = Ht3t; 

— > Htitotg = At3t3t) 

=> Htitets = Hts[yx~'titi]t], since by Equation 5.8 
Xti1tiptg = e 

[x*tiitiote]” Y =e” Y 

=> yx 'ttigtss = e 

=> ya 11 t¢t3 =e 

> ya *t1t4t3t3 = 13 

Soe ht = t2 

Htytotg = Ht3yx~'t,t4t) 

=> Ht tots = Hyx | [t3]¥ ‘ty 

=> Atytets = Ht3t 

=> Htytotg = Htyoty 

=> At totg = Htaot 1, since 

Hti9 = Ht2o 

Htytgtg € [110], since Htgot} is in [1 10}. 


2 symmetric generators will go to [1 10]. 


Atytotg = Atytotg 
=> HAtiteto9 = Hty5toto, since 


Ht, = Hts 
Htytotg = Htis5totg 

=> Hty toto = Ht3tot? 

=> Htytotg = Ht3[y~‘at?t7|#3, since by Equation 5.8 
x°tyti9t9 = € 

[xty, tito)” 7 =e os? 

=> x lytoti3ts6 =e 

=a ghiitt Se 

=> axolytet tht] = ty 

=> at ytot ity = tity 

yee yig = y_ ett 

=> te = yt at3t? 

Hijtots = Hthy atti? 

—> Hiytoty = Hy a[e4y 424} 

=> Hits = Hen 

=> Htitoto = Htity? 

=> Atitoto = Hiyx't3t,|tt°, since by Equation 5.8 
x titioto = € 


[x ti tiote]” 2 = ev 


y 

=> yr 'tigtitie =e 

=> yx libtit{ =e 

= ya ltotitt] = th 

= 90 Bh =a 

Htitotg = Hyx't3tit}° 

=> Htytety = HB 

=> Htytatg € [1], since H¢3 is in [1]. 


2 symmetric generators will go to [1]. 


Atytotig = Atytotie 

=> Ati totig = Hti1tept16, since 
Ati tg = Hty1t29 

Atytotig = Atistootie 


152 


153 


=> Htitetig = Ht3t5t4 

= Httotie = Ht3t} 

=> Htytetie = Ht?t8, since 

Ht, = Aty7 

Ae Ae 

Htytotie = Ht}t] 

=> Htytotig = A[yxt§t}?|t?, since by Equation 5.8 
xt tiotg = e 
[23t1itiote]™™ * = ety" 

= x yl tiztatis =e 

= «ly Miztatis =e 

=> fia ae =e 

=> aly thtat3ty = ty 

= aly titata® = tg? 

=> gee y= = yates? 

== yas tio 

Htytotig = Hyxt3t}e} 

= HAtitetie = Ht3th 

=> Htytetig = Ht3[a—'t3t?], since by Equation 5.8 
rtytigtg = € 
[z3tritiote]” =e" 

=> x |tototi2 =e 

Se isk) =< 

= ato l Stith = tf 

Se igl? = T) 

Hijigtig = Hila 32 

—> Htytotig = Ha [t3)" 0343 
=> Atjtetieg = Htht3t? 

=> Htytetie = Hth°r3 

=> Htytotig = Htsgto 

=> Htytotig = Htot3g, by Equation 5.9 
Htytg = Htety 


=> [Htyte|” = [Ht6ti|Y 

—> Htotsg = Htggto 

Atytotig = Htot3 

=> Htytotig € [16], since Htotsg is in [1 6] 


2 symmetric generators will go to [1 6]. 


Htytotig = Htytotrg 

=> Atyitotig = Htytet3 

=S Aptis tite 

=> Htytotig = Ht3t§, since 

At, = Atys 

Shiai 

Htytatig = Ht3ts 

Htytatig = H[yxt$t3}t§, since by Equation 5.8 
x°titioto =e 

[x ty tioto]Y =e 
=> ay tistsatiz =e 
= erty isis =e 
=> aly legtgtit? = tf 
=> aly "t303t8 = tft5 
= you ty ts = yatyts 
= is = yxt®t2 

Atytotig = Hyat$t5t§ 


=> Ati totig = Htits 


=> Htytotig = Ht? [x 't3t3], since by Equation 5.8 


xt tiot9 = € 
[x°tiitioto]” = e* 
=> zltotitio =e 
So eee 
—> a1 t}t303t5 = 65 
SS SE 


Hiytotig = HtSa e323 
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— Htytotig = Ha [e6* "4308 

=> Htytetig = HtStit3 

= Hiytotig = tye} 

=> Htytetig = Ht3t3 

==> Atitotig = Atzaty 

=> Htytotig € [12], since Ht34t11 is in [1 2] 


2 symmetric generators will go to [1 2]. 


Htytotig = Htytotra 

=> Atytetya = Atys5teti4, since 

At, = Atis 

Htytotia = Atistetia 

=> Htytotig = Hthtets 

=> Atytetis = At3t3 

=> Htiteti € [14], since Ht$t5 is in [1 4] 


2 symmetric generators will go to [1 4]. 


Htytoti7 = Htitotir 

=> Atytetig4 = AHti5tet17, since 

At, = Atys 

Atytati7 = Atisteti7 

=> Htjteti7 = Hthtat? 

=> Htiteti7 = Ht3[y~'at2t7}t?, since by Equation 5.8 
ztitioto = e 


[x*t1itiote]” = e 


-1y-1 
=> «ytotists6 = e 

=> x lytotit? =e 

=e ne = 

=> a lytetit] = tit] 

1 


=> y xa lyte = ye  wtaet 


=> tg =y lati] 
Atytoti7 = Hig att? 
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—> Htytoty, = Hy 'a[t4y '*e2t, 
=> Atyteti7 = Ht3ttt, 

=> Atiteti7 = Htity 

=> Htytoti7 = Htogty 


==> Atitoti7 = Atget, since 

Hts = Htog 

Htytoti7 = Htogty 

—> Htytoti7 = Htety 

— > Htytoti, = Htite 

= > Htyteti7 € [16], since Htytg is in {1 6]. 


2 symmetric generators will go to [1 6]. 


Atytots3 = Atytots3 

=> Atytots33 = AHty5tets3, since 

At, = Atis 

At tgt33 = Aty5tot33 

=> Htytot33 = Ht3tet? 

=> Htytotss = Ht3[ytxtitT]t?, since by Equation 5.8 
rtitioto = e 

[xt tiote]” 7) = ee" 

= x lytti3ts6 = € 

=> x lytotit? =e 

=> xo lytot{tit] = tf 

= at ytotity = tity 

yj et Yi = ya 

== ye 

Htitots3 = Athy atti 

—> Htytot, = Hy a[t4]y 22208 

=> Hijistas = A 

—. Ht totss = Atity 

=> HAttet33 = H[yx—'t3t,]t}, since by Equation 5.8 


xt11tioto =e€E 
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[xtitiote]” — ery 

=> yx tigtitie =e 

=> yo Tbh =e 

—> yar t5tit4t] = tf 

ae et 

Htitot33 = Hyx't3t1t? 

= Atytets3 = Ht3t} 

=> Htytets3 = Ht3[x—y—1t4t8], since by Equation 5.8 
xt 1tiotg = e 
[z*ti1tiote]” = e¥ 

= aly ltistgati7 = e 

=> x ly ltistsati7 = e 

=> fa alae Pe =e 

Sey Been = 
Sy ea 

Htytats3 = Ht3a~ty~ 14443 

—> Htytots3 = Ha-y)[e5]" -y "4408 
=> Httots3 = Ht3t}t3 

= Htytetss; = A130} 

=> Htytet33 = Htit8, since 

Ht7 = Htos 

A ae 

— + Htytot33 = Att} 

=> Htitots3 = H|x~yt3t2|t3, since by Equation 5.8 
xLtitiptg = e 

[x ty tote)” =e” 

= > x lytigteti3 =e 

=o Ub =e 

=> x lyt3tetit] = tf 

= xl yt3to = at 

HAtytot33 = Ha-'yt3tot8 

=> Hijistss = He? 


— Htytot33 = Htigtss 

==> Aittots3 = Htgt3g, since 
Hty = Htig 

Ati tot33 = Htotsg 


=> Htytots3 € [16], since Htotsg is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Ati tote: = Atytete: 

=> Atytote, = Ht15tete1, since 
At, = Atys 

Ht tgte, = Atys5tete1 

=> Htitote, = Ht3tet$ 


=> Htytote, = At3[ytxtitT}t§, since by Equation 5.8 


xt 1tiotg = e 

[x3ttiotelY = =ey 2 

= x lytotistss = € 

=> a lytottt? =e 

=> a lytetitfty = ty 

=> at ytyt ity = tity 

=> yen lyig = y_atitt 

=> te = yt at3t? 

Htytote: = Athy ett 

—> Htytote, = Hy !a[t4]y 4322 
=> Htytote: = Ht}t2t? 

=> Htytyte, = Hit} 

=> Htytote: = Alyx lt, ]\t? 
rtitioto = e 
[xtytyote]” 2 =er '¥ 
=> yx tigtit16 =e 
=> yx lt3tyt4 =e 
=> yx "tt tit] = tf 


=907 1h =a 
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Htytote, = Hyx't3t,t? 

=> Atitete, = HBt? 

= Htytete; = Htigty 

=> Htytot21 € [14], since Ht gtg is in [1 4] 


2 symmetric generators will go to [1 4]. 


Htytote, = Htytete, 

=> Atitete, = Htytet$ 

= Atytete = Att) 

=> Htytete, = Ht[y~tx~!t4ts], since by Equation 5.8 
x°ty1ti9t9 = € 


[x titiote]"” =e 
al 


-1 


— y lax ltoot3tia = € 

= ya eb tats =e 

= y lal thtstgty = ty 

= y tal thts = a 

Htytate; = Htyy~!x~ tts 

—> Htytete, = Hy! [tY '* tts 
=> Htytete, = Ht3 tits 

=> Htytzte1 = Htits 

=> Htitete, = Htd°ts, since 

Htz3q = Htzg 

= A= ate 

Htitote1 = Hth°ts 

— > Htytote = Ht5°ts 

=> Atytete, = H[x~ lyt9t3|ts, since by Equation 5.8 
[x tiitioto]¥” = e¥* 

=> xl ytagtigte = 

Sa Yee 


Sa yes = 


=> xo ytt3 = t3° 
Htytoto; = Hx lytft3ts 


159 


160 


=> Htitetz, = HtYt§ 

— Htytoto, = Htgeto3 

=> Atytote,; = Ht34to3, since 

Ht34 = Ht36 

At tote: = Atzate3 

= > Htytgt21 € [16], since Ht34t23 is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Htytotea = Htitates 

=> Ati tote, = Ht tapte4, since 
Htytz = Ati; t29 

Atytgte, = Ati totes 

= Ai tot Het 

=> Htytete, = Ht3 

=> Atitetes = Ht 

=> Htytete4 € [1], since Ht, is in [1]. 


2 symmetric generators will go to [1]. 


Atytates = Hty totes 

=> Atytotes = Ht15tetes, since 
At, = Atis 

Atytotes = Htistotes 

=> Htytotes = Ht3tat] 

=> Htitetes = Ht3[y~'at3ti]t7, since by Equation 5.8 
ztitioto = e 

[x3titiote|Y 7 =e% * 
—> x lytotiztzs = € 

=F Hott, =< 

=> xo lytet tit] = ty 

=> at ytyt ity = tity 

= y_ ‘aa ~lyte = ylatgt{ 


== yen 
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Htytotes = Hthytat3ttet 

—> Htytotes = Hy !a[t4]y "2383 

=> Ahjists = AEE 

=> Htytytes = Htit} 

=> Atitotes = H[yx~'t3t,]t?, since by Equation 5.8 
xt toto = e 
[xtytiote]” 2 —er'y 

=> yx tigtitie =e 

=> ye tit, =e 

= ya lt3titt] = th 

= yo et Ht) 

Htytotes = Hyx ttt} 

=> Hty totes = Ht3tt 

=> Htytotes = Htistis 

=> Atitetes = Ht12t13, since 

Hti2 = Atyg 

Ati totes = Atyot13 

=> Htytetes € [110], since Hty2t13 is in [1 10]. 


2 symmetric generators will go to [1 10]. 


Htytoteg = Htytotos 

=> Ati totes = Ht, taotes, since 
Htitz = Ati; t29 

Ht totes = Ht, t2ot28 

=> Ati totes = Ht3t3t) 

— > Ht totes = Ht3ta 

=> Htitetes = Ht?ta, since 
At, = Htl7 

= Ae SH 

Htytotegs = Ht ta 

=> Hty totes = Alyxt§t}°]ts, since by Equation 5.8 


xt11tioto =e€E 


-1 -1 
[x*tutiote|*Y * = ety * 


= «ly Miztatis =e 
= «ly Miztatis =e 
= gta tats =e 

—> aly lthtat3tZ = tf 
= aly MtPtata? = ity 
=> yor ly = yotht}® 
Sa = geist, 

Htytotes = Hyxt3t,ts 
=> Ati totes = Ht 

==> Htytoteg = Hto7 


=> Htytetes € [5], since Hto7 is in [5]. 


2 symmetric generators will go to [5]. 


Ati tot37 = Ht, tots7 


=> At,tot37 = AHti5tet37, since 


At, = Ht37 
Atyitot37 = Hti5tat37 
=> Htytet37 = Ht3t2t}° 


=> Htitet37 = Ht3[y~!at3t7]t}°, since by Equation 5.8 


«ti tioto =e 
[tu tiotol” 


=> x |ytotizts6 = e 


-1 —1,-1 
=e o 


=> a lytott? =e 

=o diettt, =e 

=a yt jut 
1 


=> y xa lyte = yiatit! 


SS 4 eet 
Atytots7 = Higg ta 


—> Htytot37 = Hy *a[t4]¥ ‘4248 


=> Atitot37 = Ht}t2t$ 
=> Htytets7 = Htité 
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=> Atytets7 = H[yx~'t3t|t?, since by Equation 5.8 
xt toto = e 
[xtytyote]” ¥ =e" Y 

=> yx tigtiti¢ =e 

= yo Bhs Se 

Saja Bitty =U 

S49 3h = a 

Htytats7 = Hyx~'t3tyt? 

Htitot37 = At3t{ 

Htytgt37 = Ht3t7, since 

Hti2 = Atyg 

=i =H 

Htytots7 = Heit] 

==> Htytets7 = Ht}[x—yt3te], since by Equation 5.8 
rtitioto = e 

[x ty toto] =e" 

= x 'ytigteti3 = e 

=> al yt8tott =e 

= «lyt3tet{t] = t] 

=> «ythte = tf 

Htytgt37 = Htja~yt3te 

=> Htytots7 = Ha-ty[t9]” “t3t2 

=> Htytot37 = Ht3t3te 

=> Htytet37 = Ht3te 

=> Htytets7 = Htyte 

=> HAtytot37 = Ht 7te, since 

Hty, = Hti7 

Htytgt37 € [110], since Hty7t2 is in [1 10]. 


2 symmetric generators will go to [1 10]. 


The orbits of N“4) are {1,35, 18, 16}, {2, 12, 15,33}, {3, 17,36, 10}, {4, 14,9, 19}, 
{5, 27, 38, 32}, {6, 24, 31, 25}, {7, 37, 28, 22}, {8, 30, 21, 39}, {11, 13, 20, 34}, and {23, 29, 40, 26}. 
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We must check to see where tytatie, tytaty2, tytat3e, tytata, ty t4t32, tytatoa, tytatos, tytqte, ty t4too, 


and t,tat49 belong. 


Atytatig = Ht tatieg 

=> Htytatig = Htitat} 

=> Htytatie = Att} 

=> Htytatig = Htit20 

=> Atyt4t1g = Ht15t9, since 

At, = Hty54 

Ati tatig = Atistoo 

=> Htytatig € [110], since Hti5t20 is in [1 10]. 


4 symmetric generators will go to [1 10]. 


Atytatig = Atytatie 

=> Htytati2 = Htytat} 

=> Htytatie = Htit4 

=> Atytatio = Bley stilt, since by Equation 5.8 
ti tiptg = e 

[x ty,tyoto]” ¥ =e? Y 

=> yr titietss = € 

=> yx +t ttt} =e 

=> ya ty tgtts = ty 

=> yao ti tity = tt] 

ay ye tty = ay Bt 

=F S85 Bt 

Htytatig = Hay 43th t4 

=> Htytatig = Ht2 

=> Atyitatig = Hty 

= > Htytati2 € [5], since Htz is in [5]. 


4 symmetric generators will go to [5]. 
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Htytat36 = Htytat36 

=> Htytatz3e = Ht tat} 

= Ati tats, = Att)? 

=> Htytat3e = Hty[x~y~1t8t?], since by Equation 5.8 
xt 1tiotg = e 
[x ty, tyoto]¥” — eye! 

=> x ty t34ti7ta =e 

=> aly ta =e 

= aly lt3titaty” = ty? 

= a lg tere = ie 

Htytatsg = Htya ly 3e8 

=> Htitatsg = Ha-ty "Ney? 4 18 

=> Htytatz3e = Ht3t3t? 

=> Htytatse = Ht§t} 

=> Htitatso = Ht7t}, since 

Atg = Ht 

= A= Ae 

Htytatse = Htzt} 

=> Htytat3e = H[x~tytett|t}, since by Equation 5.8 
xt 1tiotg = e 

[xt tiote|Y = =e 2 

= x lytat 3ts6 =e 

=a yin] =e 

= al ytot itty = ty 

=> x lytott = 3 

Htytat36 = Ha-*ytotit? 

=> Htitat36 = Htat? 

=> Htytatz5 = Htots3 

=> At, t4t3g = Ht16t33, since 

Hty = Hty¢ 

Atytat36 = Atiets3 

=> Htyt4tzg € [12], since Hty6t33 is in [1 6]. 
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Atytata = Atytata 

=> Atytat, = Ati tat, 

=> Atytats = Hit} 

=> Htytat, = H[xy~43ti]t7, since by Equation 5.8 
ztytioto9 = e 

[x3tyitioto]* ¥ =e" Y 

=> yx “t1t16t35 = e 

= yx +t ttt} =e 

> yoo ty t7t3t3 = 13 


=> ya ttt] = tt] 


= ay ‘ye ‘ty = oye 
=f = 77 Bt 

Hits = Hey 

—> Htytata = Ht3t] 

=> Htitat, = Htit{, since 
Htz = Htos 

= AR Sie 

Atytata = Ht{t} 

=> Htytats = Hti[y~txt}t§], since by Equation 5.8 
rtitioto = e 

[x3 ti1tiotg]¥” = e¥ 

— x lytzetigte = € 

=> xl ytft3to =e 


=a Wiihiy =1) 


> at ytht§ = 12°t§ 
Soe fH yee 
SiS yas 

Hijtats = Hy aig 

—> Hiytat, = Hy aft] *4h8 
=a Ia ee 
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=> Htitats = HS 
=> Atytats = Atz4to3 
= > Htytat, € [16], since Htg4t23 is in [1 6]. 


4 symmetric generators will go to [1 6]. 


Htytatso = Htytats2 

=> Atytatz2 = Hty tat} 

=> Ht tats. = Ht, t? 

=> Htytat32 = Htit36 

=> At,t4t3o = Ht15t36, since 

Ht, = Hts 

Atytat32 = Atistse 

=> Ht t4tzo € [12], since Hty5t3¢ is in [1 2]. 


4 symmetric generators will go to [1 2]. 


Atytatog = Htytatog 

=> Atitate, = Htytat$ 

—> Htytate, = Htit} 

=> Atyt4teg = Ht15t2g, since 

Ai= Htis 

Atytates = Atistog 

=> Ht tg4to4 € [16], since Hty5t2g is in [ 1 6). 


4 symmetric generators will go to [1 6]. 


Htytatog = Htytatos 

=> Htitateg = Ati tat), 

=> Atjtatos = Hit] 

=> Htytatog = A[xy1t3ti]t§, since by Equation 5.8 
rt tigtg = € 

[z3tytioto]” ¥ =e" ¥ 

=> yx |tytigtss = e 


=> wa idate =e 


=> yo tyt3t3t3 = 43 

=> yo "t1t4t] = t3t] 

=> sy ya t = cy tt 

= tf = wy tt 

Htytatog = Hey 1t3tht§ —> Htitatog = Ht3t} 
—> Httatog = Htrtie 

=> Atyt4teg = Hto5tig, since Ht7 = Htos 
Htytatog = Htostie 

=> Ht t4teg = Htigte5, since by Equation 5.9 
Htitg = Hteti 

=> [Hty te] * = [Hgts] 

=> Hti6tes = Htastie 

Ati tatog = Atietos 

=> Ht tatog € [16], since Htigte5 is in [ 1 6). 


4 symmetric generators will go to [1 6]. 


Htytatg = Htytate 

=> Htitatg = Htitat? 

=> Htytatg = Htyt? 

=> Htytats = H[xry—'t3t]]t}, since by Equation 5.8 
rtitioto = e 

[z*ti1tiote]” ¥ = e* ¥ 

=> yx “t1t16t35 = e€ 

=> yo tt tGte =e 

=> yoo t1t3t3t3 = 43 


=> yx 'tytath = t3t) 


=> xy lyn" = wy *t3t) 
—= tf = wey tees 
Hite = Hey hii => Aijits = Hint? 


=> Htytatg = Ht3[x~ly~ #349], since by Equation 5.8 


xt11tioto =e 


[x ty, tyoto]¥” = eye” 
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=> x ly ltaatizts = e 

=> aly ta =e 

= aly *t3titaty” = in 

= tg dee = ae 

Hides = Hew yO ee 

—> Atytats = Hay) 2]? 908 

=> Htytatg = Hts°t3t? 

= Aitite= HGH 

—> Htytats = Htgotiz 

=> Ht t4tg = Ht17t39, since by Equation 5.9 
Atite = Htet, 

=> [Htite]” = [Hteti]|¥” 

==> Ati7t30 = Htzotiz 

Atytatg = Ht17t39 

=> Htytatg € [16], since Hti7t30 is in [1 6] 


4 symmetric generators will go to [1 6]. 


Htytatoo = Htitatao 

=> Atytateo = Atistateao, since Ht; = Atys 

Ati tatoo = Atistatoo 

=> Htitatig = Higtat} 

— > Ht tatoo = Atty 

=> Hty tatoo = Ht3[y-tx—1t5t9], since by Equation 5.8 
ztytiotg = e 

[xtytyote]” “ =e™ Y 
= yar 'tats3too = e 
=> ue te =e 


=> ya 5th tgty = tf 


=> yr tpt? = tf 

Htytatoo = Hiya lt34$ 
=> Htytateo = Hy~ta~1[t3]Y 
=> Htytatoo = Histgt} 


Shsiat 
He) 
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=> HAtytateo = Ht3t? 

> Htytatoy = Htgats3 

=> At, t4te9 = Htz6t33, since Ht34 = Ht36 

Htytatoo = Htzat33 => Htytgteo € [110], since Htg4tg33 is in [1 10]. 
4 symmetric generators will go to [1 10]. 

Htytatay = Htytatao 

=> Htytatag = Htyt4t}° 

— > Htytatag = Hty 

=> Htytatao € [1], since Ht; is in [1]. 


4 symmetric generators will go to [1]. 


N68) has 40 single orbits. We will check to see where 

titty, titgte, titets, titeta, titets, titete, titety, titets, titeto, titetio, 

tytetii, titetia, titetis, titetia, titetis, titetie, titeti7, titelis, titetio, titetio, 
ty tetar, titetse, titetes, titeted, titetas, titetae, titeta7, titetos, titetag, titetso, 


ti tets1, titetze, titetss, titetsa, titetss, titetze, titets7, titetss, titet39, and ttet49 belong. 


Htytet, = Htitets 

=> At tet; = Atet,t,, since Htytg = Htet, 
Htytet; = Htgtiti 

=> Atitet) = Htogt?, since Hts = Htog 
Htytgt = Htogt? 


=> Htytet) = Att? => Htytet, = Hti[y~txz—'¢3t4], since by Equation 5.8 


x°tiitioto = e 

[x3 ty tyo0to]Y =e 

=> x ly ltgtrats3 =e 

=> ao tye atety =e 

—> aty ltgtgtft? = tf 

= a ye tats = te 

Htytgt) = Hthy-la—lt3ts 
=> Htytet) = Hy a7" [t7)4 
=> Hijtet: = H8tst4 


aie, 
tate 
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=> Htitet, = H3th 
=> Atyteti = Ag5ti4 
=> Htytgt, € [14], since Htg5t14 is in [1 4]. 


1 symmetric generator will go to [1 4]. 


Htytgt2 = Htytet2 

=> Atyteto = Htyt3te 

=> Htytete = Ht t3 

=> Ati tet, = Htitio 

= > Htitete € [110], since Ht,ty0 is in [1 10]. 


1 symmetric generator will go to [1 4]. 


Htytet3 = Htytgt3 

=> Atytet3 = At, t3ts 

Htitets = Hti[x~ly~tat9]tz, since by Equation 5.8 
x titioty = € 

[xty, tote)” 7 =e" * 

=>? ty ltatist3a =e 

pr tatat 

=> aly t4t3t8t3 = t3 

Sg ty ae = 

Htytgts = Htyx~ly tatty 

—> Htytetz = Hoty [ty |" Y tat 

=> Htytets = HtY tat} 

=> HAtitets = Ht} 

==> Htytets = Ht} [y-txttt4], since by Equation 5.8 
x titioto = € 

[x ty, toto] — ev 

=> x ytigtotr =e 

=a yet =e 

= a lyt3totit] = tf 


= a7 yi: =H 
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> y hoe lyf = y tothe? 
Spay ay 

Htitets = Ht}y-1axtlt, 

—> Htytgts = Hy~1a[tl|Y tits 

=> Htitets = Httht, 

=> Htytets = Ht}t, 

=> Htytgts = H[xyt3°tS]ta, since by Equation 5.8 
xt ti9t9 = € 


2,,-1 2,,-1 
[x*tiitiote]” ¥ =e ¥ 


1a ltastants =e 


=> —-/=_ 
=> ya eis =e 

=> yah titst3? = 3° 

> y ta eats = 039th 

=> yy ee = xytst§ 

=> tf = cytz°tf 

Htitgts = HaxytstSt, 

=> Htitets = HtZ°t] 

=> Htitets = Ht4°[yx—'t3t1], since by Equation 5.8 
ti tiptg = e 
[z*tiitiote]” ¥ =e" Y 

=> yr 'tigtitie =e 

= ya lt3tt4 =e 

=> yo ti tit] = tf 

=> yx l8t, = t] 

Htytets = Htd°yr Bt, 

—> Htytets = Hye 1[t}0* "tt, 

=> Htitets = Ht t3ty 

=> Atitgt3 = Ht ty 

= > Httet3 = Htety 

=> Atytet3 = Atte, since Ht,tg = Htety 
Htytgt3 = Htyt¢ 

=> Htytets € [16], since Htytg¢ is in [1 6). 


1 symmetric generator will go to [1 6]. 


Htiteta = Htitets 

=> At tet, = Atetit4, since Htitg = Htet, 
Htitets = Htgtita 

=> Hite = Ais 

=> Htytets = Htatits 

=> Htitets = Ht3[ry~'t3ti]ta, since by Equation 5.8 
rti1totg = e 

[x tutiots]” 4 = e*Y 

=> yx “tytigt35 = e 

=> yo 1h tGte =e 

> yao ty tpt3ts = 13 


=e ni Sa 


= py ye a -_ ay ttt 

== th = cy ltt] 

Hijteta = Hay tits 

—> Htitets = Hoy *[02]*4 #328 

=> Htitets = Ht tt} 

=> Htytets = HtZ°t§ 

=> Htiteta = H[y~tx~ 149 t3]t§, since by Equation 5.8 
xtytioto = € 


2,,-1 2 
[x*tiitiote]” ¥ =e ¥ 
1 


-1 


=> y x ltagteot3 =e 
=> ylatHtits =e 

=> ya ti titst3” = t3° 
Se a 
Hijtea= Ay tea 
—> Ht tet, = tht; 

=> Htitgt, = Ht3tt, since 
Ht33 = Ht35 

=H St 
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Atytgt4 = ARE 
Htitgts = Ht8[x~!ytatf], since by Equation 5.8 
x7t11tioto =e€E 


[z*tritiote]Y” * = 


-—1,-1 


=> r~!ytoti3t36 = e 

Sa yi Se 

=> a lytot itty = ty 

=o yoni =e 

Htjtets = Hz yiat, 

—> Htytet, = Ha-!y[t2]* tot 

=> Atitets = Ht3tett 

==> Hiiteta = HBt 

=> Ati tet, = Htigtis 

=> Atytet, = Atyot13, since Htyg = Ht1g 
Htyteta = Hti2t13 

= > Htytgt4 € [110], since Hty2t13 is in [1 10). 


1 symmetric generator will go to [1 10]. 


Htytets = Htitets 

=> At tgts = Atetits, since Htjtg = Htet, 
Htitets = Htetits 

=> Atytets = H28tyts, since Htg = Htog 

Htytets = Htogtyts 

= Htitets = Htitt? 

=> Htytets = Htit} 

=> Htitets = H[yx~'t3t,|t?, since by Equation 5.8 
ztytioto = e 
[x3tytyote]” Y =e" Y 
=> yr 'tigtitig =e 
=> yx lt3tyt4 =e 
=> yx "tt tit] = tf 


=907 1h =a 
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Htytets = Hyx't3t,t3 

=> Atytets = Ht3tt 

=> Htitets = Htigtis 

=> At,tgts = Atyet13, since Htj2 = Ht1g 
Htytgts = Hty2t13 

= > Htytgts € [110], since Hty2t13 is in [1 10). 


1 symmetric generator will go to [1 10]. 


Htytgte = Htitete 

=> Atitetg = Htistete, since Ht, = Hts 
Htytets = Htistete => Htitets = Ht t3t3 

=> Htjtets = Htty 

=> Htytets = Ht, |xytt?], since by Equation 5.8 
rti1totg = e 


-1 
[a3 tiitiot|® 4 
1 


-1 -1 


— ex Y 
= y ‘a7 tatsztz0 = e 
=o Bin =e 

ye ott a 
a ety = 


— ryy tas = 


vythty 
=> t§ = aytft? 

Htytete = HtyxytSt? 

=> Htitets = Hay[t|*4t$e? 
=> Htitets = Ht3t$t? 

—> Ht, tets = Atity 

=> Htitets = Htgt?, since 
Hto = Ht1¢6 

Aiea, 

Htytete = Htgt? 

= Httgts = Hly~'at3ti|t?, since by Equation 5.8 
x°tyti9t9 = € 


AH S387 
[x*tiitiote]¥ 7 =e * 


=> x tytatistss = e 

=a htt =e 

==> xo yteti tat = ty 

= at ytot itt = tity 

= yen yig=y_ att 
Sy ee 

Htytets = Hy‘ at?tit? 

= Htjtete = Atit} 

=> Htitgts = Ht5t?, since 
Atg = Htog 

= Ai = Atk 

Htytete = Htgt? 

Htytets = Ht5[ryts°t§], since by Equation 5.8 
xt 1tiotg = e€ 


2,,-1 2) = 7 
[a°t1itioto]” Yo =ery 


1a ltastaots =e 


=> —'/=_— 
=> yo a eis =e 

=> yla"ttjtsta? = 13° 

= ya tRtS = tty 

=> ey a = cytst$ 

= Sa 

Htytets = HtSxytht§ 

=> Htytete = Hay[t5]*4tdr$ 

= Hite Hered 

=> Htytgts = Ht3t§ 

— > Htitets = Htgstoa 

=> Htytgte € [16], since Ht35¢24 is in [1 6] 


1 symmetric generator will go to [1 6]. 


Htitetr = Htytetr 
=> Htytet7 = Ht, t3t2 
=> Htytet7 = Hti[x~ly~'t4t3]t2, since by Equation 5.8 


176 


2°ti1tiptg = e 
[xty tote)” 7 =e" * 

=> x ly~ttatistsa =e 

= 4a ttatets Sie 

— aly ltat3tats = tS 

=> as Tate = iG 

Htytgt7 = Htyx~1y + t4t3t? 

—> Htytety = Ha~ty [ty]? 9 tate? 
==> Hite = Anta 

=> Atitet, = Hip t3t3 

=> Htitet7 = Ht8t3t2, since 

Ht30 = Htao 

=e = Ai 

Htytet7 = Ht8t3t2 

— Httgt7 = At3t3 

=> Htytgt7 = H[x~'t4t3|t§, since by Equation 5.8 
xt toto = e 

[x°t1itioto]” = e* 

— x 'totitio =e 

=a ue Se 

—> a tpt3e3t5 = 65 

= 

Hite = He 38 

=> Htitet7 = Ht3t3 

— Htytet7 = Htyot35 

=> Htytgt7 € [14], since Hti2t35 is in [1 4]. 


1 symmetric generator will go to [1 4]. 


Atytets = Htytetsg 

=> At, tgtg = Atetits, since Htitg = Htet, 
At tets = Htgtitg 

=> A iiete Sis tits 
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=> Htytets = Ht3[ry~'¢3ti]t7, since by Equation 5.8 
rti1tot9 = e 

[x ty, tote)” # = ery 

==> yx “ty tiet35 = e€ 

= yo ttt 08 =e 

SS ibis Hts 


ye Hee, 


= ey ye tty = ay t3th 

Saag, 

Hijtets = Htday 1 3th8 

— Htytetg = Hoy [02]*4 "1349 

=> Bites Het, 

=> Ht tts = At3° th 

=> Atitgts = H[y-!x— "49 t}]t9, since by Equation 5.8 
x°titioto = € 


[z*tritiote|” ” | = e* 
1 


2o,—1 


y 
—> y~!x7ltg3teot3 = € 

= aoe tats =e 

> ya thet} = 11° 

= y ta tity = 13° 

Htitetg = Hy 121194342 

=> Htytetg = Ht9t3 

— Htytets = Hts3t12 

=> Htitets = Hts3ti2 

=> Atytetg = Atssti2, since Ht33 = Ht35 
Atytgtg = Ht35t1o 

= > Httetg in[12], since Htgstig is in [1 2] 


1 symmetric generator will go to [1 2]. 


Ht tgt9 = Htyteto 
=> At tgt9 = Htetito, since Htitg = Htet, 
Atyteto = Atgetitg 
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=> HAtytgto = Htogtitg, since Htg = Htog 

Htyteto = Htogtito => Htiteto = Att, t? 

—= Htiteto = Heit} 

=> Htyteto = H[yx~'t3t,|tf, since by Equation 5.8 
rt tigtg = € 
[xtytyote]” 2 =er 'Y 

=> yx ttigtitig =e 

= 42 Binit =e 

Saye Pitta 

ye Birt 

Htyteto = Hyx t8tit} 

=> Htitety = Ht3t} 

=> Htyteto = Htigti7 

=> Atytetog = Atyet17, since Htjg = Ht1g 
Atitgto9 = Htot17 

= > Htytgtg € [12], since Hty2t17 is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Htitetio = Htitetio 

=> Atytetio = Ht, t3t3 

=> Htitetio = Atits 

=> Htytetio = Htitis 

=> Atytetio = Ht15t1g, since Ht, = Hts 
Atitetio = Atistis 

=> Ht tgtio € [14], since Hty5¢1g is in [1 4] 


1 symmetric generator will go to [1 4]. 


Atytgty, = Atytety 
= Hiytetu = Wty t3t3 


= > Htiteti = Ati[x~ty|tat$]t3, since by Equation 5.8 


xt11tioto =e€E 


[xtytiote]Y = ey 
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=>? x ty tatistza =e 

= eye tates =e 

=> aly ltat3tgts = tS 

= ae tg tats = GE 

Httetia = Hie ty athe 

—> Htytety = Ham !y'ty]* 9 tat 
=> Atytety = Ht{tats 

=> Htytety = Htp°th 

=> Htyteti = Ht8t?, since 

Ht39 = Ht4o 

= He hoe 

Htyteti = Ht5t3 

=> Htytety = Ht3t5 

=> Atiteti, = Ht8[x-ty~ 4? t4], since by Equation 5.8 
rtitioto = e 


-1 -1 
[x titiotg]*Y v= et 


x 


=> [x-lyty7tatis = € 

=>? aly le tats =e 

=> aly ltitat3ts = tf 

=e yy eat 

Htiitetu = Ht§a-ty- ets 

=> Htytety, = Hay" [8)" 9 tb 
=> Atitety, = Htt?t, 

— Attgty = Htita 

=> Htyteti, = Ht3ts, since 

Ht7 = Htos 

SH Sait: 

Ht, tet1 = At3ta 

=> Htiteti = A[yx'tyti]ta, since by Equation 5.8 
X°*ti1tiptg = e 

[xt11tiote]” ¥ =e” Y 


=> yr tytigtss = e 
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= yo 1t1t4t3 =e 

=> yar" tytgt3t, = ty 

=> yo thty = iz 

Htyteti = Hyx'tythta 

=> Atiteti = Att} 

=> Htyteti = Htitoo 

=> Atytety, = Ht15to9, since Ht, = Atys 

Atytgty = Atisteo => Atytgti € [110], since Hty5t29 is in [1 10]. 


1 symmetric generator will go to {1 10]. 


Htytetig = Htitetr2 

=> Atyitetig = Htetiti2, since Htit6 = Htety 
Atytetig = Atetitig 

=> Atjtetis = HBtiti 

=> Htitetie = Ht3[ry1t2t]]t?, since by Equation 5.8 
zt toto = e 

[x tutioto]” 4 = ew Y 

=> yx “titiets5 = e€ 

= yo 1t1t4t3 =e 

> yoo ty t3t3t3 = 13 


Sg hi 


Say ye ta ey ae 

=> ty = cy 1 t3th 

Htytetig = Htry 13th} 

—> Htytet = Hey [02° "13410 

= Ani = ABE 

—> Htiteti, = Ht3°t) 

=> Atiteti2 = H[y-tax'9t4]t}°, since by Equation 5.8 
xt t10tg = € 


2,,-1 2 ed 
[er titiotel’ Y =e" 2 


1 


= —Y x !t33teot3 =e 


Sgr a tse 


= ya tgtst” = t3” 

= ya ltt} = t3° 

Hiigha= Hy a ei 

=> Atytetig = Ht} ty 

=> Atitetig = Ht33t16 

=> Htytgtie € [14], since Ht33t 6 is in [1 4]. 


1 symmetric generator will go to [1 4]. 


Htytetis = Htitetis 

=> Htytgti3 = Htgtit13, since Htyte = Htgt, 
Htytetis = Htetitis 

= Htitetis = Ht t} 

=> Htitetis = Ht3t} 


=> Ati teti3 = Ht3lyxtst}], since by Equation 5.8 
x ti tioto =e 


=4 -1 
[xt tiote|*Y * = ev 


x 


=> x ly~lty7tatis =e 

=> erty tas =e 

=> aly ltitat3ts = tf 

=> aly tPtata? = tg? 

= gor yt = yxth ty? 
=> e = yas tio 

Htyteti3 = Ht3yxrt3t}° 

=> Hiiteti3 = Hyx([t2]9* est}? 
=> Htytetig = Ht3t5t}° 

=> Htyteti3 = Ht3t}° 

=> Htiteti3 = Htitao 

=> Ht tgtig € [16], since Hty,t40 is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Atytetig = Atytetrs 
=> Htyteta = Ht, t3t4 
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=> Htitetys = Htyts 

=> Htitetia = Hty[yx~t7t3], since by Equation 5.8 
rt tigtg =e 

[x titioto]®¥ = e*4 

= yx tietsstig = e 

See Se 


ye Gti te 


= yr 473 = ¢8 

Hhigha= Hage ye 

—> Htytetya = Hyx[t,Jy" ‘1408 
=> Hijighia = Atte? 

= Htytetia = Htht3 

=> Httetia = Hth°t2, since 
At32 = Ht 

=i 

= Atitetra = Htz°th 

==> Htitetis = H[x~tyt4t3|t8, since by Equation 5.8 
x titioto = € 

[x*ti1tioto|¥” = e% 

=> x lyts6tigte = e 

=> al ythtSte =e 


=o Wiabi = e 


= aT lytht} = 3° 

Atytetia = Hal ytht3t3 

=> Hite = HR 

= Htytetia = Htz6ti 

=> Htytetia = Htzaty1, since Ht34 = Ht36 
Atytetig = Htzatr 


=> Htytgti4 € [12], since Ht34t11 is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Atytetis = Atytetis 


= Htitetis = Ati t3t3 

=> Atytetis = Hty[x—!y!t4t4]t3, since by Equation 5.8 
rti1totg = e 

[x ty, tyoto]” * = eY 


Say aie — 


-ly 


=> ety tates =< 

> aly t4t3tht5 = 05 

Sg ya Sa 

Hiytetis = Htyz—ly~ltgt3t} 

—> Hiytetys = Ha-!y[t]J” 4 tat8 
=> Htytetis = Htftat§ 

= Htitetis = Ht,°t3 

=> Htytetis = Ht§t§, since 

Ht39 = Ht4o 

=H] Ai 

Htytetis = Ht3t3 

Htytetis = Hx~'t?, since by Equation 5.8 
x titioto = € 

[x°tiitioto]” = e* 

= rtetitio =e 

Sa Se 

—> aT tpt3e3t5 = 65 

=> a7 ht5t8 = 1808 

=> x ltt = 5 

Atytetis = Hx~'t] 

— Htytetis = Ht 

=> Htytetis € [1], since Hty2 is in [1]. 


1 symmetric generator will go to [1]. 


Atytgtig = Htytetie 
=> At tetig = Htetitie, since Htitg = Htgt, 
Atytetie = Atetitie 
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=> Htytetig = HtRtit4 

=> Htitetig = Ht3[ry—1t2t]]t4, since by Equation 5.8 
rt tiotg = € 

[x3 ty: tiote]” ¥ =e? ¥ 

—= yx “titietss = € 

=>? ye ees =e 

> yao ty tpt3t3 = 13 


= oe nt Se 


Say ‘ya ty = cy ttt 
— tf = ay l42t] 

Hiytetig = Htkay—lt2t4t4 

—> Htytetig = Hay [2% 8 
=> Htytetig = Ht3t? 

=> Htitetie = Ht? 

— Htitetig = Ht39 


=> Htytgtig € [5], since Htg9 is in [5]. 


1 symmetric generator will go to [5]. 


Htytetiy = Htitets7 

=> Htytegti7 = Htgtiti7, since Htyte = Htgt, 
Htyteti7 = Atetitiz 

=> HAtyteti7 = Htogtiti7, since Htg = Htog 
Atyteti7 = Htogtiti7z 

—> Htytetiy = Htitt 

=> Htytetiz = Ht7t§ 


=> Htytetiz = Hti[a—ty—1t4t8], since by Equation 5.8 
rtitioto = e 

[xt tiote]” =e” 
= ay tistaitir Se 
Sy at Se 
> aly egegetee = th 


= las | ia es = if 
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Htytetiz = Htia—ty 14328 

—> Htytety, = He-y[el}* y4408 

==> Hijtetr, = Heise 

— HAttgti7 = Ht3°tS 

=> Atiteti7 = Ht8t3, since 

Ht29 = Ht39 

He SA 

Htyteti7 = Atht} 

=> Htyteti7 = H[xt3t3]t2, since by Equation 5.8 
xt tiotg = € 

SSP ae 

= 2 t3t3tit} = tf 

=> 27#3t3 = tf 

Atyteti7 = Hx t3t3t3 

=> Htiteti7 = Ht3te 

=> Htitetiz = Htirte 

=> Ati teti7 = Htyi7to, since Hty, = Hty7 
Htytetiz = Hti7te 

=> Ht tgti7 € [110], since Hty7t2 is in [1 10] 


1 symmetric generator will go to [1 10]. 


Atytgtig = Atytetis 

=> Atytgtig = Atistetig, since Ht; = Ht15 

Ati tetig = Atistetis 

=> Htytetig = Ht3t3t5 

= Atitetig = Ht3t5 

=> Htitetig = H[yxt$t3}t5, since by Equation 5.8 
rti1totg = e 
[x3tytyote]¥ = e¥ 
=> x ly ltistsati7 = e 
= ae yr tatat? =e 


Say Beak = 


=> aly gtget = tft] 

=> yoy at; = yathty 

=>? ts = yatot? 

Htytetig = Hyxt$t3t3 

=> Htitetig = Ht$t8 

=> Htytetig = Htortsa 

=> Atytetig = Hto3t34, since Hto1 = Hto3 
Htytetig = Htoztsa 

=> Atytetis = Atz4to3, since Htogt34 = Htzato3 
Atytgtig = Atzatos 

=> Htytgtig € [16], since Ht34te3 is in [1 6] 


1 symmetric generator will go to [1 6]. 


Htytetig = Htytetr9 

=> Htitetig = Ht t5t} 

=> Htitetig = Hti[x~ty~tat$]t3, since by Equation 5.8 
xtitioto = e 
[x3titioto|Y 7 =e" 2 

=> x ty ltatistza =e 

=a ye ats Se 

> aly t4t3tBt5 = 03 

py tats SG 

Hiytetig = Htya—ly—1t4the8 

—> Htytetig = Ha by [ty]" Yat? 

=> Htytetig = Htftat2 

— > Htitgtig = Att? 

=> HAtiteti9 = aaa since 

Atz9 = Htao 

Se a 

Htytetig = Ht3t 

=> Htitetig = H[x~'t}t3]t3, since by Equation 5.8 


xt11tioto =e€E 
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[x°tiitioto]” = e* 

= 7 /totitio =e 

So tense 

—> «4913 t3t5 = 65 

So eS 

Hitetio = Aa Hie 

=> Htytetig = Ht3ts 

=> Htytetig = Htiets 

=> Atytetig = Ht gt3, since Htjg = Ht 
Htytetig = Htigt3 

=> Htytetig € [110], since Htygtz is in [1 10). 


1 symmetric generator will go to [1 10]. 


Htytetoo = Htitetao 

=> At teteo = Htetiteo, since Htite = Htety 
Htytgtoo = Htetitoo 

=> Htytetoo = Heh th 

=> Htitetoo = Ht3[ry't2ti]t7, since by Equation 5.8 
ztytiot9 = e 

[xty,tyoto]” ¥ =e? Y 

=> yx “titiet35 = e 

= yx +t ttt} =e 

> ya *t1t4t3t3 = 13 


Sg i a 


ay yr tty = ayn Bt 

Sa Stal 

Htitetoo = Ht3ry tt, 

—> Htytetoo = Hey) [t3}° tty 

==> Htitetoo = Ht3t3t, 

—. Ht tgtey = Ht3°ts 

=> Atitgteo = H[y-tx—'t4t4]t4, since by Equation 5.8 


xt11tioto =e€E 
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[xt1itiote]® = ev y 


1z—ltg3toot3 = e 


—— 
=> fe ke ats =< 

> ya U8 tStgt}0 = 110 

= y la ltt} = t3° 

Htytgtoo = Hy x79 tite 

=> HAtytgteo = Ht}t§ 

=> Htytgtoo = Htsgtoa 

=> Atytete9 = Ht35to4, since Ht33 = Ht35 
Ati tetoo = Atg5tea 

= > Ht tgteo € [16], since Ht35¢24 is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Htyteto1 = Htyteto 

=> Atytete: = Htetite1, since Htite = Htety 

—> Htyteto, = Htetitn 

=> Atytete; = Htogtito1, since Htg = Htog 
Htytete: = Htiti ts 

=> Hiytete: = Htjt] 

=> Atitgte = H[yx~'t3t,]t{, since by Equation 5.8 
ztitioto = e 


[x ty tiote]” = ev 


y 
=> yx |tigtitig = e 
=> ya lt3tit4 =e 

=> yo” tptrtgty = tf 
=> yo Bt = tf 
Htiteta: = Hyx't3tit4 
=> Htytete: = At3t} 
==> Htytete, = Ht3t®, since 
Ati = Atig 

= Hi aA 
Atyteto: = Heit} 
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Atytgto; = Hale rt , since by Equation 5.8 
rtytigtg =e 

SP Se 

= #t3t3eit} = tf 
Seat 

Hite = ARE Be 

—> Htytete, = Ha? [3] 303 
=> Htitete: = Ht3t3t3 

=> Htytete: = Ht3t5 

=> Htytete = Ht’t3, since 
Hto, = Hto3 

Shea 

Htytete1 = Htfts 


Htitete: = H[x—'y~1t3t8]t3, since by Equation 5.8 
ti tiptg = e 

[x ty tyote]¥ = e¥ 

=> rly ltistgati7 = € 

=> yet, =e 

=> aly t3e3tht? = tf 

=> a ty ae = a9 

Htytete: = Hay 1490383 

=> Atytete: = Athte 

= Htiteto: = Htiste 

=> Ati tete; = Ht,te, since Ht; = Hts 
Htytgto, = Htyte 

=> Htytgte1 € [12], since Htite is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Atytgteg = Htytegteoo 
=> Atytete2 = Ht, t2t§ 
= At, tetoo = Htyt§ 
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=> Atytete. = Atila “t3e41, since by Equation 5.8 
xt toto = e 

[xtiitiote|” = e* 

—> ¢~totitip =e 

Sa ee Se 

See a 

eR 

Htytgteo = Htyx~t3t3 

—> Htytete. = Ha [t1]* 348 

=> Htytgto, = Ht4t3t3 

=> Htytete, = Htqt3 

=> Atitete. = Atistu 

=> Atytete2 = Ateti,, since Hto = Hty¢ 
Htytgte2 = Htoty, 

=> Htytgt22 € [110], since Htgty is in [1 10]. 


1 symmetric generator will go to [1 10]. 


Atytgto3 = Htytete3 
=> Htitetes = Ht t3t§ 


=> Atytete; = Hty[x—y!t4t4]t§, since by Equation 5.8 


xt tioto =e 
[x ty tyote]” = e 


=> x ly ltatistss = e 


ly 


=> ty ata. =e 

> aly t4t3tt5 = 05 

= ¢71y th = a 

Htytetes = Htya—ty~t4td° 

— Htytgtes = Hae-y [ty] 9 t4t}° 
=> Httete; = Htft,ti° 

— Ht tgtes = Htg°t3° 

— > Atytgtes = Ftg°t3° 


=> Httete; = Ht§t3°, since 
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At39 = Ht4o 

SS HeShoe 

Ht, tgto3 = At5t3° 

Htytgtez = Ht§[y~'x—'¢$t4], since by Equation 5.8 
rtitigtg =e 


De: 2 ad 
[x*tiitiote]” ¥ =e" ¥ 


lel tastaots =e 


= Y 
= ya tits Se 

=> y ta ti titst3” = t3° 

Saye a 

Hite = Hey a 4G 

=> Htytetes = Hy ta 18)? ht 

—> Htytgto; = Ht tht} 

=> Atitete3 = Ht} t} 

— Htitgte3 = Htizt20 

=> Atytete3 = Ht11te, since Ht,, = Hty7 
At tgtez = Hti1t20 

=> Htytgte3 € [12], since Hty1t29 is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Htytetea = Atitetoa 

=> At tgtea = Htgtitoa, since Htitg = Htet, 
Atytete, = Hteti tea 

=> Hii — AGG 

=> Htytetes = Ht [ey t3t]]t§, since by Equation 5.8 
zt tiptg =e 

[z3tritiote]” ¥ =e? ¥ 

—= yx “titietss = € 

= yr ite Se 

=> yoo tyt3t3t3 = 43 


Se ht a 


= xy ya-tty = a me ta 
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=== ay l42t] 

Hty totes = HtRry—1t2t4t8 

—> Htytetes = Hay) [e2]¥ 1222 

=> Hiitetes = Ht3t3t? 

=> Htytetes = Ht3°th 

= HAtytetes = Hie la yiat;| , since by Equation 5.8 
Gtiatipty= € 

[x3ty tote)” = =e? 

=> xl ytatigtz6 =e 

=> x lytotit? =e 

=> xo lytet{tit] = t7 

ser yin, St 

Htytgtoa = Hth°x~lytott 

=> Htytetes = Hid ’xlytott 

—> Htitete, = Haa'y[t}|” Ytot4 

=> Htytetes = Ht3tott 

=> Atitgta = Ht} 

=> Htitetes = Htiotis 

=> Atyteteg = Htooti3, since Hti9 = Ata 
Htytgtea = Ataoti3 

=> Htytgte4 € [12], since Htgot13 is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Htytetos = Htitetes 

=> Htytgtes = Htgtites, since Htytg = Htgt, 
Htytetos = Htetitos 

= Htitetes = Htogtites, since Hts = Htog 
Atytetes = Htogtytos 

=> Htytetes = Htitt? 

= Atytetes = tit} 

=> Htitetes = Ht{[x>t3t3] , since by Equation 5.8 


xt11tioto =e€E 
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=> x t3t3t} = e 

—> x7 3t3titt = tf 
Sea 

Hijtetes = Htle* Be 

—> Htytetes = Hx? [t7)?" 2303 
=> Htiitetes = Ate 

=> Htytegtes = Hth°t3 


=> Ati tetes = Htagtio 


=> Atytetes = Htiotz9, since Htiot39 = Htz9t19 
Ati totes = Htiots9 
=> Ht tgte5 € [16], since Htyot3o9 is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Htytgtog = Htyteto6 

=> Ati teteg = Atistetes, since Ht, = Ht15 
Atyteto6 = Ati5teto6 

=> Ht tgtes = Ht4t3t5 

= Htytetes = Ht3t3 

=> Htytetes = H[yxt$t3}t8, since by Equation 5.8 
xt 1tiotg = e 
[x3t1itioto]Y =e 

=> a ly tistaiti; = 

=> ae ey tet =e 

> arty *3tgttt? = tf 

> aly 43t3ty = tft] 

= yay tao 'ts = yaty ty 

=> tf = yrt?t? 

Htytgtos = Hyat$t5t3 

=> Htytetes = Ht® 

=> Htyteteg = Htoy 

=> Htitgto6 € [5], since Ht, is in [5]. 


1 symmetric generator will go to [5]. 
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Htitete7 = Htyteto7 

= Htyteter = Ati t3t3 

=> Htitete7 = Hti[x~ty~|tat§]t§, since by Equation 5.8 
rti1totg = e 
[xtytyo0to]Y =e 

=> x ty tatistza =e 

=a ye ate Se 

=> aly ltat3tgts — tS 

=> a ty ltat3 = ‘3 

Htytete7 = Htyx—ly~1t4t3ts 

=> Htytete7 = Ha~!y"[ty|” Yt 
=> Htytete7 = HtYts 

=> Atitgte7 = Ht}? 

=> Htitete7 € [5], since Ht}? is in [5]. 


1 symmetric generator will go to [5]. 


Htyteto3 = Ati totes 

=> Htytgtes = Htgtiteg, since Htytg = Htgt, 
Atyteteg = Htetitog 

=> Htytetes = Ht3tit] 

=> Htytetes = Ht [ey t3t]]t], since by Equation 5.8 
rti1 toto = e 

[z*tuitiote]” Y =e” Y 

== yx “titietss = e 

= ya it ate =e 

> yo lt1t4t3t3 = 43 


= ya 'tytgth = t3t) 


Say yr ty Soy et 
StS ay te 

Htytetog = HitRay—le2t4e] 

—> Htytetes = Hay~)[e2]*¥ 323 


=> Htiteteg = Ht3t3t} 

= Httetes = Ht3°t} 

=> Htytetes = Ht8t}, since 
Ata9t39 

— Hei 

Ht teteg = Ht}t} 

Htitgtos = Ht§[xt§t§], since by Equation 5.8 
x°ty,ti9t9 = € 

[x>tritiote|” = e* 

— x 'totiutio =e 

=r Wks =e 

> «7 t4t3t5t5 = £8 

—> a tpt3e8 = t5t§ 
S27 = wists 

=i) Soe 

Htytetos = Ht8rt8t§ 

=> Htytetes = Ha[t¥]*t5t8 
=> Htytetes = Ht8t8e8 

=> Htytetes = Ht3t3 

=> Atytetes = Atigtsi 

=> Htytgteg € [16], since Htigt3 is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Htytete9 = Htitetao 

=> Htytgteg = Htgtite9, since Htytg = Htgt, 
Htytgtog = Htgtyt29 

Ht tet29 = Htogtiteo, since Hts = Hts 

At tetog = Htogti tog 

= Htyteto9 = Ht tre} 


=> Htytete9 = H[yx 't3t,|t?, since by Equation 5.8 


xt11tioto =e€E 


[xtytyote]” 2 = ev 
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=>? yx tigtiti¢ =e 

Sao But; Se 

Saye Bit = 

= 40 Bi = tf 

Htytete9 = Hyx—'t3tyt$ 

=» Aijisiog = AH” 

=> Htytgt29 = Htists7 

=> Atyteteg = Ht1ot37, since Htj2 = Aty1g 
Ht tgte9 = Hty2t37 

=> Htytgte9 € [16], since Hty2t37 is in [1 6]. 
=> Atitgteg = Ht3t} 


1 symmetric generator will go to [1 6]. 


Htytets0 = Htitetso 

— Htytetz0 = Htistetz0, since Ht; = Atis 
Htytetz30 = Hti5tet30 

= Htytet39 = Ht3t5t3 

= Htytet30 = Ht3ty? 

=> Htytetso = H[yxt}t3]t)°, since by Equation 5.8 
rti1 toto = e 
[xtiitioty]Y = e% 
=> «ly tistzati7 = € 
=o ty i Se 
> oly Mes = of 
=> aly ligtoty = tht? 
= yoy tats = yathty 
=> tf = yrt?t? 

Htytet30 = Hyat}t5t)° 
=> Htytet39 = HtSt2 


=> Htytet30 = Ht? [yt xtit{], since by Equation 5.8 


xt11tioto =e€E 


ee S387 
[x*tiitiote]¥ 7 =e% 
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=>? x lytati3ts6 =e 

=a htt =e 

==> xo yteti tat = ty 

= at ytot itt = tity 

= yen yig=y_ att 

SS Sy ae 

Htytet3o0 = Htoy—tat2t! 

—> Htytet39 = Hy !x[t$y "2347 
=> Htitgtso = Ht7t2t! 

—> Htytgt3o = Htitt 

==> Atytetz0 = Atietes 

=> Ht tgtzo € [16], since Hty6te5 is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Atytet31 = Ati tet31 
=> Atitets: = Ht t5t3 

=> Atytets, = Hty[x-y+t4t4]t§, since by Equation 5.8 
ztitioto = e 

[x ty, toto)” = eY 


=a ye tats =e 


-ly 


=> ao ly tages =e 

> aly t4t3tt5 = 05 

Soy ai =e 

Htitets1 = Htya—ly~tat3t8 

—> Htytgts, = Hay" [t]" 'Y ‘tats 
=> Htitets: = Ath tats 

— Ht, tgts1 = Hti°ts 

=> Atitgt3, = Ht§t3, since 

Ht39 = Ht4o 

= 

Ht tots: = Ht5ts 

=> Httgts; = H[x—t2t3]t3, since by Equation 5.8 
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x titiotg = € 

[x°ti1tiote]” = e* 

= 7 totitio =e 

=o 8b =e 

==> x7 't7 030505 = 68 

Sa ie = 73 

Htytets1 = Ha t}t3t3 

= > Atytets: = Att} 

==> Atytets3, = Atiotis 

=> At, tet3; = Ht1gt15, since Htj2 = Aty1g 
Htytgt31 = Atigtis 

=> Httets1 € [12], since Htigtis is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Htytgt32 = Htitets2 

=> Htytgtz32 = Htgtit32, since Htytg = Htgt, 

Ht tet32 = Htetitz2 

=> Htitets. = Atti t® 

=> Htytetz2 = Ht [xy tt] ]t§, since by Equation 5.8 
x tytiotg = e 

[xtiitiote]” ¥ =e” Y 

=> yx “ty tiet35 = e€ 

= yn ie Se 

> yoo t1t9t3t3 = 43 


ye ate 


= ayn ye ty = cyt, 
Sh Say i 

Hiytetsg = HtRay—1t2t7¢8 

—> Htytetz2 = Hay) [e2]*¥  t2¢4 
=> Htitets2 = Ht3t3t} 

—> Ht tgtz2 = At3°t4 


==> Htitets, = Alyx l¢9t4]t4, since by Equation 5.8 
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x°t11t10t9 =e€E 

2,,—-1 2 
[xP t11tite]* ¥ =e" ¥ 
1 


-1 


=> y x tagtoot3 = e 

=> y la Htits =e 

= y~ tate titsty” = t3° 

Se eS 

Htytet3q = Hy a e8tht4 

=> Htitets. = Htht? 

=> Htytgt32 = Htz3tz6 

=> Ati tet3o = Ht35t36, since Ht33 = Ht35 
Atytgt32 = At35t36 

=> Htytgtz2 € [110], since Htg5tz6 is in [1 10]. 


1 symmetric generator will go to [1 10]. 


Atytet33 = Atitets3 

=> At tgt39 = Atetit33, since Htitg = Htet, 
Htytets3 = Htetitas 

Ati tet33 = Htogtit33, since Htg = Htog 

Ati tets3 = Atogtits3 

=> Ht tet33 = Atityt} 

=> Htitets3 = H[yx't3t,]t}°, since by Equation 5.8 
rtitioty = e 

[x tyitiote]” ¥ =e" 

= yr 'tistitis = € 

=> yx lt3tyt4 =e 

=> ye" tpt tft] = ty 

—> yx lt, = t] 

Htytets3 = Hyx~'t3t,tt° 

=> Htitets3 = Hts 

=> At tgt33 = Ht1g 

= > Httgt33 € [1], since Htyg is in [1]. 


1 symmetric generator will go to [1]. 
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Atytet3. = Atytetza 

=> Httets, = Ht, 1203 

—> Htitets4 = Hty 

= > Htytgt3a € [1], since Ht is in [1]. 


1 symmetric generator will go to [1]. 


Htytet35 = Ht, tots 

= Htitets, = Atyt3t3 

=> Htitet34 = Hty[x~ty~tat§]t2, since by Equation 5.8 
xt ti9t9 = € 
[x3titioto|Y 7 =e" 2 

=> x ty tatist3a =e 

Sn ye ae Se 

> aly t4t3tBt5 = 15 

=> a to Tats = G 

Hijtetaa = Hiya ty 1t4th8 

—> Htytetz34 = Ha by" [ty]" 4 tat? 
=> Htytets, = Ht} tat? 

—> Ht tgts4 = Ati ts 

=> Httets, = Ht§t2, since 

Ht39 = Ht4o 

= He hoe 

Htitgt34 = At3t3 

Htytet3. = Ht8[yx'tt4], since by Equation 5.8 
xt tioto = € 

[x3 tri tioto]? ¥ =e? ¥ 

=> yr ty tigtss = e 

=> ga it aee =e 

=> yar 't1t9t3t3 = 3 

a tit, Ste 

Htytetza = Ht§yr—'tyt4 
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=> Htytets, = Hyr "(8)" ‘tit4 

=> Atitet3, = Att, t4 

==> Attia =A 

=> Htitet3, = Htostao 

=> At, tet34 = Htaotes, since Hto5tag9 = Htag = Htos 
Atytgt34 = Htaotes 

=> Ht tgtz4 € [16], since Ht4otes is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Htytgt36 = Htitets6 

= > At tgt3g = Htetit36, since Htitg = Htet, 
Htitet36 = Ht3tyt4 

Htytets6 = Ht3tyt} 

Htytetse = Ht3[xy~'42t7]|t9, since by Equation 5.8 
ztytioto = e 

[z*tuitiote]” 4 = e*Y 

==> yx “ti tiet35 = e€ 

=> yo tt tGt8 =e 

> yo ty t4t3t3 = 3 


= oe ni, Se 


=> oy ye = ay ttt 
— tf = ay ltt] 

HAtytets6 = Ht3ry—lt2t4t} 
—> Htytets6 = Hay [t2]°% | 1348 
=> Htytetss = Ht3t3t} 

=> Httetas = Ht3°t} 

=> Htitetse = Ht8t}, since 
Ht29 = Ht39 

= 47 =H 

Ht, tgt36 = Atty 

— Atytgts5 = Atht} 


=> Htytetss = Ht§[xythts°], since by Equation 5.8 
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x°t11t10t9 =e€E 


[xty1 tote]? = ety 
1 


—1 


=> y la toptstia = € 

=> y-lattgts = e 

=> y la titstts = tS 

=> ya titsts? — t5t3° 

=> zyy a 't3 = xytsts? 
=> 1} = xyt3t;° 

Htytet36 = Htharyt5ts° 

=> Htytetss = Hay[th} tgs? 
=> Htytets6 = Ht§t5t3° 

= Htytetss = Ht5t3° 

=> Htytet36 = Ht3[y~tx~1t9t3], since by Equation 5.8 
xt tiotg = e 


2,1 oat 
[a t1itioto]” Yo =ery 


1a ltastaots =e 


=> Y 
= yo ais =e 

=> yo aH tjtsts” = t3° 

=> ye ee = i 

Hijtgieg = Hy ae 

=> Htytet35 = Hy tae]? 4908 

=> Htytetze = Htt°tft} 

=> Ati tgt36 = Ht8t} 

=> Htitgts5 = Ht29t20 

==> Hittgtzg = Atzote9, since Htaote9 = Hto9t20 
Atytgt36 = Hteota9 

=> Htytetz6 € [16], since Htgota9 is in [1 6]. 


1 symmetric generator will go to [1 6]. 


Atytet37 = Htytgt37 
=> Ht tgt37 = Htgtit37, since Htitg = Htet, 
Atytet37 = Ht2t,t1° 


Htitet37 = Ht3 
Atytets7 = Hte 
Htytgt37 € [5], since Htg is in [5]. 


1 symmetric generator will go to [5]. 


Htitetsg = Htytetsg 

=> HAtytets3 = Ht, t3th° 

=> Ht tetsg = Htyto 

=> Htytetag € [12], since Htyte is in [1 2]. 


1 symmetric generator will go to [1 2]. 


Htytet39 = Ht tet39 
—> Ht tgt39 = Htyt5t3° 

=> HAtytets9 = Hti[x~y+t4t4]td°, since by Equation 5.8 
ztytioto = e 

[x3 ty, trote]” '* = e 


=> z ly ltatistsa = € 


-ly 


=>? ao ly tatats =e 

= aly” *tatgt5 ts = t5 

Say ie = 

Hijtetig = Atay taste! 

—> Htytgtz9 = Hay [tJ” Y t4t3 
=> Htitets9 = Htftat3 

=> Httets9 = Ht}t3 

=> Htytets9 = Htaotir 

=> Atytet39 = Ht11ta0, since Hty,ta9 = Ataoty1 
Atitgt39 = Hti1tao 

==> ttgt39 € [16], since Htt40 is in [1 6). 


1 symmetric generator will go to [1 6]. 


Atytetao = Atytetao 
=> At tgta9 = Htgtit40, since Ht ite = Htgt, 
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= Hite = ih 

=> Htitetay = Ht3[ry't3t7]t}°, since by Equation 5.8 
Zt tiotg = e 

[z3tutiote]” ¥ = e* ¥ 

=> yx “tytigt35 = e 

=> ye ees =e 

> yao ty tpt3t3 = 13 


= oe nt Se 


ay ‘ya ty = cy ttt 

== ay lt2t] 

Hijtetan = Hibry tet? 

—> Htytetao = Hay [t2]"% | 1248 

=> Alitetay = Hee 

= Httetay = At3°th 

=> Htitetag = H[y~'x—l¢9t4]t§, since by Equation 5.8 
x titiot = € 


2,,-1 2: 
[x*tiitiote]” ¥ =e ¥ 
1 


-1 


— > y ‘a7 lt33t20t3 = € 

=> ylaHtits =e 

=> y~ ta tp titsty” = t3° 

= y ta tity = 3° 

Htytetap = Hy al e$tht8 

=> Ht tetsao = Ht? 

=> Atytetag = Ht33 

= > Htytgtao € [1], since Hts is in [1]. 


1 symmetric generator will go to [1]. 
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The orbits of N@!) are {1, 3}, {2,4 {5, 7}, {6, 8}, {9, 11}, {10, 12}, {13, 15}, {14, 
16}, {17, 19}, {18, 20}, {21, 23}, {22, 24}, {25, 27}, {26, 28}, {29, 31}, {30, 32}, 


{33, 35}, {34, 36}, {37, 39}, and {38, 40}. We will check to see where 
Atytioti, Htytiote, Atytiots, Atitiote, Atitioto, Atitiotio, Atitioti3, Atitiotia, Ati tioti7, 


Atytiotig, Htitiote:, Atytioter, Atitiotes, Ati tiotes, Atitiotes, Atitiotso, Atitiotss, 
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Atytotsa, Atytyot37, Atytiotsg belong. 


Htytioti = Htytioti 

=> Atyitioty = Aty5tiot1, since Ht, = Hts 
— > Atytiot; = At3t3ty 

=> Atytioti = Hts [xt§t8]t1, since by Equation 5.8 
ti tiptg = e 
[z*t11tiote]” = e™ 

— gNiptgtic = e 

= 7 Ot Se 

=> x tBettty = tf 

> oN tgtttt = tht} 

S70 Se 

= =a, 

Htitioti = Hijct§thty 

=> Htytigti = Ax[t3]*¢3e} 

=> Atytiot, = Htytht? 

=> Hittin = Ata, 

=> Htytiot, = Ht5t?, since 

Ht, = Htya4 

= His = AG 

Htytiot1 = Ht3t} 

HAtytiot: = H[xyt$t?}t?, since by Equation 5.8 
x titioto = € 


—1,,-1 —1,,-1 
[x*tutiote]® Y =e* ¥ 


=> y- 1x27 tyat33te0 = e 
=> ge ee =e 
> y tae t508 = 19 
Sy a iS 
=> ey ets = wytht? 
> Sa 


Atytioti = Haytitte 
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=> Atytiot; = Ae 
=> Atytiot; = Hto4 
=> Htytiot, € [5], since Ht, is in [5]. 


2 symmetric generators will go to [5]. 


Htytiote = Htytiote 

=> Atytiote = Ati5tiote, since Ht, = Hts 

=> Htitiote = At3t3te 

=> Htytrot, = Ht3t} 

=> Htytiot2 = H[yxt$t3}t5, since by Equation 5.8 
rt tiotg =e 
[x3tritioto]Y =e 

=> x ly ltistsati7 = e 

=> ay Mie =e 

=> aly gegett? = tf 

> aly 3tgt] = tft 

=> yoy e143 = yat StF 

=, =e 

Htytiot2 = Hyxt$t3ts 

= Htytiote = AthtS 

=> Htitiote = Ht? [yx 't4t2], since by Equation 5.8 
rtitioty = e 

[x3 tirtiotg]®¥ = e7Y 

— > yr tietsstis = e 

=> yx lt Be =e 


=> yo 44t8tbt8 = 18 


=> ye te = S 

Htytipte = HtSyx-l17t8 

=> Htytiot, = Hye [eS]ur't4t2 
=> Htytiote = Ht7tit2 

=> Htytiote = Htftg 


=> Atytiote = A toats5 


=> Ati tiote € [16], since Hto4t35 is in [1 6]. 


2 symmetric generators will go to [1 6]. 


HAtytiots = Atitiots 

=> Atytigts = Hti5tiots, since Ht, = Hts 
Atytiots = Atistiots 

=> Atitiots = Ht3t5t7 

=> Atytiots = AtS[rt§t$]t?, since by Equation 5.8 
x ti 1tiotg = e 
[a titiotel” | =e" 

— > ¢tiototig = e€ 

=> x li3tit] =e 

—> a lebttettg = tf 

> othe? = tit 

= oot = att8 

=f Sate 

Htytiots = Hegrtheht? 

=> Htytiots = Hyx[t9}*e§t}° 

=> Atytiots = Ht{tStt° 

=> Hintiots = Atay 

=> Htitiots = Ht5t}°, since 

At, = Ati, 

=e it 

Htytiots = Ht3t;° 

Htytiots = H|xyt§t?]tt°, since by Equation 5.8 
xt toto = e 


=i 
[a3 tiitiot|® 4 
1 


-1 -1 


— ex 'Y 
—= yx ltrats3t20 = e 
= oe ete =e 

Sy eat tits ta 


= yo ta gett = tht 


=> ayy tats = aytht? 
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= i5 =r 

Atytiots = Haytht{t?? —> Htytiots = Atft 
=> Htitiots = HtSt1, since 

Hto2 = Htoa 

heat 

Htytiots = HtSt, 

Htytiots = Ht§[xy~1t2t]], since by Equation 5.8 
xt 1tiotg = e 

(x ty, tyote]” # = ety 

= yx “titietss = e€ 

yn Witte Se 

> yar *t1t4t3t3 = 13 


er 


=> eyo lye ty = cy 't3th 

=> ty = vy tt] 

HAtytiots = HtSry1t3t] 

—> Htytyots = Hey [e8}ey 23t7 

=> Htitiots = Ht3tt] 

=> Htytiots = Ht4t] 

=> Atytiots = Atistes 

=> Htytiots € [16], since Hti5 tg is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Htytiote = Htitiote 

=> Atytiotg = Hti5tiote, since Ht) = Hts 
Atytiote = Htistiote 

=> Hittites = Abe 

=> Htitiots = Ht3t3 

=> Htitiots = A[yxt$t3}t3, since by Equation 5.8 
X°ti1tiptg = e 

[x ty tyoto]Y = eY 


—2 


=> zlyltistsati7 = e 
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Sa ay Se 
Sey Eee =u 
==> arty gtd = tft 


— yoy * 


ote Uae 

SS Sa 

Htytiots = Hyxt$t3t3 

=> Htitiots = Ht}t5 

=> Atitiots = Ht§[y-'a'¢4ts], since by Equation 5.8 
xt 1tiotg = e 

[x tutiots}? = eto 

=> [yx ltaoptztia = € 

=> [yal eBtst = e 

= [y tat eptst5ty = t5 

= ye ae Se 

Htitiote = Ht8y—1a1t3t3 

—> Ht tits = Hy !a [ty '* "tty 

=> Htytiote = Htitits 

—> Htytiote = Htats 

=> Htytiotg € [14], since Ht4ts is in [1 4]. 


2 symmetric generators will go to [1 4]. 


Atytiotg = Htytioto 

=> Ati tigt9 = Hti5tiot9, since Ht, = Hts 
Atitiotg = Atistiots 

=> Htitioto = Ht3tst} 

=> Htytioto = Ht3[xt§], since by Equation 5.8 
xtitioto = e 
[x*tutioto]®” =e" 
=> x |totgti2 =e 
= 7 Bh Se 
=> ol tBettity = tf 


14343 — 48 
== rx t5ty = x73 
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So Sc 

Htitioty = Ht3ct§ 

=> Atti =Aze re 

=> Htytioto = Htit§ 

— Ht tity = Hts 

=> Htytiotg € [1], since Ht, is in [1]. 


2 symmetric generators will go to [1]. 


Atytiotio = Atitiotio 

=> Atytiotio = Ht t3t3 

— > Htitiotio = At, ts 

=> Htytiotio = Htilyx't4t2], since by Equation 5.8 
x°ti1tiptg = e 

[x3 ti1tiotg]®¥ = e7Y 

=> yx tietastis = e 

=> ya "44 Ah =e 


=> yoo 't7t3t3t8 = t§ 


=> yo tts = . 

Htytiotio = Htiyx '¢4t8 

=> Htytrotio = Hye "(tJ t4t8 
=> Htitiotio = HiGgtats 

= Ait = Atits 

=> Htitiotio = Htht3, since 
Ht32 = Ht3 

= = Ase 

Htytiotio = Aty°t3 

Htytiotio = H[x~*yt9t3]t2, since by Equation 5.8 
xtitioto = e 

[x tritiote]¥” = e¥* 

— x lytsetigt, = € 

=> xl ytft8to =e 


=> a lytZtBtets® = t3° 
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=> x lyt}t} = 17° 

Htytiotio = Ha~lyt9t3t3 

=> Hitiotio = Ate 

=> Atytiotio = Atgeti 

=> Atytiotio = Atzat11, since Ht34 = Ht36 
Atytiotio = Atzati 

=> Htytiotio € [12], since Htg4t11 is in [1 2]. 


2 symmetric generators will go to [1 2]. 


Atytiotig = Atytiotis3 

=> Atytioti3 = Atistioti3, since Ht, = Hts 

Ati tioti3 = Atistioti3 

= Atitiotix= Htgt5ty 

=> Ati tiotis = Ht3[xtht®}tf, since by Equation 5.8 
ztytioto = e 

[x ty, tiote]” =e 

— > ¢—ltiotgtig = € 

=o Bi Se 

—> a lebtiettg = tf 

> abet = teh 

= oo te = at8t8 

=> 13 = cthtt 

Atytiotig = Ht3aththtt 

=> Htitiotis = Halts] "tht 

=> Htytiotis = Htythty 

=> Atytioti3 = Htaty 

= > Htytioti3 € [12], since Htgt, is in [1 2]. 


2 symmetric generators will go to [1 2]. 


Atytiotia = Atytiotia 
=> Atytiotia = Atystiotia, since At, = Aty5 
Atytiotia = Atistiotia 
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= Htytroti = Ht3t3t5 

=> Atitiotis = H[yxt$t3]t§, since by Equation 5.8 
xt 1tiotg = e 

[x ty tyoto]Y =e 
=> ay tipteatiz =e 
Say Se 
> ly eSe518 = 18 
=> aly t303t] = tty 
= yay ta 'ts = yaty ty 

=> is = yxt®t? 

Atytiotia = Hyat$t3t5 

=> Htytiotis = Ht}t3 

=> Htytiotia = Htertsa 

=> Ati tiotya = Htogtz4, since Hto, = Hto3 


Atitiotia = Htozgt34 


=> At tiotia = Htzate3, since by Equation 5.9 
Htytg — Htety 

=> [Htite]*4 = [Hteti|*4 

==> Atz4to3 = Atogtz4 

Atytiotia = Atzate3 

=> Htytiotia € [16], since Ht34t23 is in {1 6]. 


2 symmetric generators will go to [1 6]. 


Atytiotiz = Atitiotiz 

=> Atytigti7 = Atistioti7, since Ht, = Hts 
Atytioti7 = Atistiotiz 

=> Atitioti7 = Ht3t3t} 

=> Htitioti7 = Ht3[xt§t®}t?, since by Equation 5.8 
rt tiotg =e 
[z*tutioto]” =e" 
=> x ltiototi2 =e 


=a Se 


=> a ebtteitg = tf 
> oo tpett? = tit 

Se Base 

= Sa 

HAtytioti7 = Htgat§t?t? 

=> Hitiotin = Helis "he 

=> Atytioti7 = Htitht? 

=> Atitioti7 = Htat? 

=> Atytioti7 = Htats 

=> Htytiot17 € [16], since Htgts is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Atytiotis = Atytiotis 

=> Atitiotig = Ht t3t3 

= Atitiotis = Att) 

= Atytiotis = Ht, [x 1¢303], since by Equation 5.8 
xt toto = e 

[x°t1itioto]” = e* 

=> x totitio =e 

=a ue Se 

—> a tpt3e3t5 = 65 

ss 

Atitiotig = Htix—1t3t3 

—> HAtitiotis = Hea "[ty]" ‘#343 

=> Htytiotig = Htatit3 

=> Hijtiotis = Hig 

=> Atitiotis = Atieti 

=> Atytiotig = Htoty1, since Htz = Ati, 
Atytiotis = Atetiu 

Htytiotig € [110], since Htgt,; is in [1 10]. 


2 symmetric generators will go to [1 10]. 
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Atytiote1 = Atytiotar 

=> Atytiote; = Atistiote1, since Ht) = Htys5 
Atytiote: = Atistiotar 

—- Atytigte: = At3t5t} 

=> Atitiote: = At3t3t 

= Atytiote; = Fekecan iad ae since by Equation 5.8 
xt tiptg = e 
[x3tytyote]” =e? 

— gNiptgtic = e 

= 7 Ot Se 

=> x tBettty = tf 

> oN tgtttt = tht} 

So Se 

= =a, 

Htytiote: = Htgat hoes 

=> Atytite = Halt3]*tht} 

=> Hittite: = Htytht? 

=> Atitiote: = Htat} 

=> Ht tite, = Htato 

= > Htytiote1 € [110], since Htytg is in [1 10). 


2 symmetric generators will go to [1 10]. 


Htytiote2 = Atytiote2 

=> Atytioteg = Atistiotee, since Ht, = Htis 

Ati tiote, = Atistiotee 

=> Hijtijtes = HB 

=> Htytigter = At3t5 

=> Atitiotee = H[yxt$t3]t8, since by Equation 5.8 
xt11tiotg = e 

[x3 tri toto)” =e 
=> z-1yltistsati7 = e 


= ety aia: =e 
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> a ty ed Be948 = 18 
=> aly t3e3ti = tty 
=> yoo ets = yxtSt? 

= is = yxt®t? 

HAtytioter = Hyxt?t3t3 

=> Hittites = Hyzt? 

==> Atitiotes, = Hyxrte1 

=> Htytiote2 € [5], since Hyxtg, is in [5]. 


2 symmetric generators will go to [5]. 


At tiotes = Atitiotes 

=> Atytiotes = Atistiotes, since Ht, = Htis 
Atytiote, = Atistiote2 

=> Htytigtes = Atgt5tt 

=> Atytiotes = Heel. since by Equation 5.8 
X°ti1tiptg = e 
[xtytyote]” =e? 
=> x tiototi2 = e 
Sa tr =e 
=> a tptttity = tf 
=> a lebetet = htt 

=e =a 

Sh SGue 

Htytiotes = Htfat§t3t? 

=> Htytigtes = Ha[t9]* tht? 

=> Atytiotes = Htytht? 

=> Htytiotes = Htati 

= > HAtitiotes = Ht3tt, since 

His = Htia 

= Hi AL 

Htytiotes = Att} 

=> Htytiotes = Ht5[y~'at§t], since by Equation 5.8 


x°t11t10t9 =e€E 
[x?tiitiote]*4” =e" 
= > x lytis3t36tig = € 
= a ae =e 


=> xo lytitt3t8 = t§ 


=> a lytitfty = tz 

Sy ee 9 SO ee 
= t= yl wt§ty 

Htjtigtes = Higy- ihe 
—> Htytiotes = Hy !a[t4]y '*48t3 
=> Htitiotes = Ht3t8t4 

=> Htytiotes = At3t} 

=> Atytiotes = Htyt3, since 
Ht, = Htis 

= Hip Ai, 

Htytiote, = Htiti 

=> Htitiotes = Hit} 


=> Htytiotes = H[xy't4t4]t7, since by Equation 5.8 


x°tytiot9 = € 

[x3 tii tioto|? ¥ = ev ¥ 

=> yx ty t6t35 =e 

= yx +t ttt} =e 

= yal tytpt3ts = 3 

=> ya ti tity = tt] 

Say ye tty = ayn Bt 
=> t = cy tl 
Htytiotes = Hay t3titt 
=> Htytiotes = Ht} 

=> Htytiotes = Ht3t} 

=> Atytiotes = Ait since 
Ht7z = Hto5 

SSH at 
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Htitiotes = Atty 

=> Htitiotes = Hti[y~'at4t8], since by Equation 5.8 
x t11tiotg = e 

[x tiitioto]¥” = e 

—> x lytsetigte = € 

=>? xl ytitsts =e 


Etta, Ste 


> ah ythtgt§ = 12°08 
Sy ae i =o ey 
SY Pints 

Htytiotes = Htiy~'atgts 

=> Htytiotes = Hy *a[t7]Y e308 

= Aiitnbe= Hi et 

=> Htitiotes = Ht3t§ 

=> Htitiotes = Htzate3 

=> Htytiotes € [16], since Htz4te3 is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Atytiotes = Atitiotes 

=> Atytioteg = Atistioteg, since Ht, = Htys5 

Ati tiotes = Atistiotes 

=> Htytiotes = Ht3t3t5 

—> Htitiotes = At3t5° 

=> Htitiotes = H[yrt$t3]td°, since by Equation 5.8 
ti tiptg = e 
[x3tytyote]Y = e¥ 
=> rly" ltistsati7 = € 
=> ey tote =e 
=> aly htge3tht? = tf 
=> a ty 3 t3tt = et 


1 


= yry” ais i = yat Sty 


=a, Sot 
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Htytiotes = Hyaxt$t3th° 

=> Htytiotes = Atte 

=> Atytioteg = At8to, since 

At, = Ato; 

= He 

Htytiote6 = Ht8tz 

Htytiotes = Ht§[y~‘xt3t{], since by Equation 5.8 
x°ty,ti9t9 = € 

[z*tiitiote]” "= eve 

= > x 'ytatistse = e 

=a yt —e 

=> a lytotithty = ty 

= at ytotit, = tty 

= yen Tyig = y_atitt 

=> te=y latit? 

Htytigtes = HtSy~ xt3tt 

—> Htytigtes = Hy 1a[tS|y'*23t7 
=> Htitiotes = Htit?t! 

=> Htytiotes = Htitt 

==> Atytiotes = Atietes 

=> Htytiotee € [16], since Hti¢te5 is in {1 6]. 


2 symmetric generators will go to [1 6]. 


Ati tioteg = Atitiotes 

=> Atytioteg = Htistioteg, since Ht, = Hty5 
Atytiote9 = Atistiotas 

= Htytiote9 = Ht3t3t) 

==> Htitioteg = Ht3[xt§t®}t8, since by Equation 5.8 
rti1 toto = e 
[z*tutioto]” =e" 
=a tigtetis =e 


=a Se 


=> a ebtteitg = tf 

> oo tpett? = tit 

=> “LX = = athe 

=P Salt 

Atytiote9 = Htgat§tet§ 

=> Hiihiotes = Halts "Be 

=> HAtytioteg = Htitht? 

=> Htytiotes = Htat} 

=> Atytioteg = Hee. since 

Ht4 = Ht 

= Hie ae 

Htytiote9 = Ht3t} 

Htytioteg = Ht5[yxtst]°], since by Equation 5.8 
x ty, ti9t9 = € 
[x3t11tioto]°™ * = ery ‘x 
— gly lt 7tatis = € 
=a ye iat, Se 

=> aly ltitat3ts = tf 
=> aly ltitaty® = thtg? 
=> yor ly t = yatsts® 
=P = yxtlt? 
Htitiote9 = Ht3 SURES. 

=> Htitioteg = Hyx[t5]¥* tht}? 
=> Htitiotes = Higese}? 
— Htytiptes = At3°t, 


=> Htitioteg = H[y~ta—1t9t3]t}°, since by Equation 5.8 


ti tioto =e 
[z*tiitiote]” Y | =e" ¥ 


lel taatoot3 =e 


=> Yy 
= ata tts =e 
> y- la 9 48tgtl0 = 410 


=> Ure te = i? 
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Htytioteg = Hy~*a~'43t3t4° 

=> Ati tioteg = Ht}t4 

=> Atytioteg = Ht33t16 

= > Htytioteg € [14], since Htggtig is in [1 4]. 


2 symmetric generators will go to [1 4]. 


At tiotz0 = Ati tiotso 

=> Atitiotso = Ht t3t> 

=> Atytiots9 = At, 

=> Htytiotzo € [1], since Ht, is in [1]. 


2 symmetric generators will go to [1]. 


Atytiots3 = Atitiotss 

=> Atytiot33 = Atistiot33, since Ht; = Htys5 
Atytiots3 = Atistiotss 

=> Htytiots3 = Htgt5t} 

=> Htitiots3 = Ht3[xtht®}t?, since by Equation 5.8 
xtitioto = e 

[x tyjtiote]” =e 

— > ¢tiptgtig = € 

SS te 

= al t3tftpt] = tf 

> a tb ett? = thee 

=> ee te = eee 

= =2e 

Htytiotsg = Htjat§tet? 

=> Htitiotss = Ha[tg]*t8t8 

=> HAtytiots3 = Ht4tSto 

=> Htytiot33 = Atat} 

=> Htytiot33 = Ht4[x—!y~'¢4t8], since by Equation 5.8 
xt 1tiotg = € 


[x?tritiote]” = e% 
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=> 27 ly7tistsati7 = e 

= omy ie =e 

=> arty lgt3the? = ze 

= gg ets =i 

Htytiots3 = Htgx~ty~ 438 

—> Htytiots3 = Hae~!y[taj®™ the 

=> Htytiots3 = Ht3t3t3 

=> Atytiot33 = A343, since 

Atz3; = Ht37 

=e =a 

Htytiots3 = Ati °ts 

=> Htitiots3 = H[yx~'tt3]t, since by Equation 5.8 
rt tity = e 

[xt11t1ote]¥ = eY 

= > yx ltgstigti = e 

=> yo tty =e 

=> yx" t5tity? = 4° 

=> yo 1883 = ue 

Htytiots3 = Hyx #34308 

=> Atytiots3 = Ht3t3 

=> Atytiots3 = Htz5t10 

=> At, tiot33 = Ht33t19, since Ht33 = Ht35 
Atytiots3 = Atsstio 

=> Htytiots3 € [12], since Ht33t10 is in [1 2]. 


2 symmetric generators will go to [1 2]. 


Ati tiotsa = Atitiotsa 

=> Atitiotsa = Ht t3t8 

— > Htytiots, = Hty 

=> Htytiotsa € [1], since Ht, is in [1]. 


2 symmetric generators will go to [1]. 
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Atytiot37 = Atytiots7 

=> Ati tigts7 = Atistiot37, since Ht; = Hty5 
Atytiot37 = Atistiots7 

=> Htytigts7 = Ht3t5ty° 

=> Htitiots7 = Ht3[xt}t?}tt°, since by Equation 5.8 
xtitioto = e 
[z*tutiots]®” | = e* 

= «totgti2 =e 

=a eH =< 

— al t3tfeit] = tf 

> atthe} = t7t} 

=> pa te = xtt8 

= Sa 

HAtytiots7 = Htgat§tt}° 

=> Atytiots7 = H2[t4]*t§t? 

=> HAtytiot37 = Htit htt 

=> Htytiots7 = Htati 

=> Ati tiots7 = Ht5tt, since 

Ats = Hty4 

=e Ht, 

Htytiots7 = Ht3t{ 

=> Atytiot37 = H[xyt$t?|t{, since by Equation 5.8 
xt 1tiotg = e 


=a 
[a3 tiitioto|® 4 
1 


a. -1 


= erly 
==> y'x|tatszt20 = e 
=> Ue te =e 
=> ya tp tgty = tf 
> yt at eity = tity 
=> eyy tats = aytht? 
to Sart 
Htytiot37 = Hayt9t?tt 
=> Htitiots7 = HtSt? 


=> Atytiots7 = Atats3 

=> Ati tiot37 = Htoot33, since Htog = Htoas 
— Htytiots7 = Htoots3 

= HAtitiot37 = Ht33t22, since by Equation 5.9 
Atitg = Atti 

—> [Htte]Y = [Htets|¥ 

=> Ht33te2 = Htoats3 

Ati tiots7 = Atsgto2 

=> Htytipts7 € [16], since Htg3tg2 is in [1 6]. 


2 symmetric generators will go to [1 6]. 


Ati tiotss = Atitiotss 

=> Htytiot3g = Ht, t3t4° 

=> Atitiotss = Htit3 

=> Atitiotss = Htits 

=> Htytiotsg € [16], since Htitg is in [1 6]. 


2 symmetric generators will go to [1 6]. 
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This concludes our double coset enumeration. Below is our completed Cayley Dia- 


gram. 


Af 0 


Figure 5.3: My, Over (C4: Cs). 
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5.4.2. Manual Double Coset Enumeration over a Maximal Subgroup 


of Order 720 


Now we will perform Double Coset Enumeration over our other maximal 


subgroup. 


Recall that we had 2 maximal subgroups that contained both f(x) and f(y). We will 


examine subgroup 5. 


We see that the order of this subgroup is 720, which is larger than our other subgroup. 


Next we find a representation of this larger subgroup in words. 


> #M[5] ‘subgroup; 

720 

> D:=Conjugates (G1,M[5] ‘subgroup) ; 

> D:=SetToSequence (D); 

> £(x) in D[5] and f(y) in D[5]; 

true 

> for g in D[5] do if sub<D[5]|f(x),f(y),g> eq D[5] 
for|if> end if; 

for> end for; 

> Order(gg); 


then gg:=g; 
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4 

> if Order(gg) eq 4 then for i in [1..7920] do if ArrayP[i] eq gg 
if|for|if> then Sch[i]; end if; end for; end if; 

Yea ae Ae aks SS a SE es Yk AE 

> Order(f(y7-1l * t°-l * x * t * y°-1l * t)); 

4 

> G<x,y,t>:=Group<x,y,t|x°4,x*y°-lL*x*-l*y*-2, 

yo -2*x°-lLey*x,t°11,t*y=t74, (x°-1«t) °*8, 

tr x) "5, 

Eby ay ory 

H1:=sub<G|x,y>; 

H2:=sub<G|x,y,y°-1 * t*°-1l * x * t * y°-1l * t>; 
#DoubleCosets (G,H2,H1); 


x KX 
+ 


#G/#H2; 


PV WV VV RR 


hb 


First we will expand our additional relations. 


y it-laty lt 
yi ty etry "ty 
y tt xt y*t 


y*ts7x[y*y “]try*t 


yi ts7zy*[y “tiy*|t1 
4 

yitszry "(td Jt 

y' [(wy*)(zy*)~"Jtsray*toti 


yxy" [(vy*)ltg7zy*}tot 


y't37xy' tot 


4 
yxy" [t32 |toti 


yxy *tootgty 
ay tootgty 
ry*tooti ty 
ry toott 


Hay’ tot} 


Hay? toot}t] = Ht} 
Hay*to2 = Hti 
Hxy’to2 = Ht2s 


Hto2 = Atos 


€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
€ H 
=H 
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(5.10) 


(a?t")> = 


(att)? 

(x7t33)° 
£7t3307t3327t33 

a? (72 *)tgga7t3g07t33 


xx? (a *t33x")t33a7t33 


x 2 
t33 (330 t33 = 


tg5t33xt33 
t35 (27a *)t33a°7t3s 
t3507(a "13307 )tg3 
typn tt ata 
t352° tg5t33 
(272 *)t35a°tgsts3 


x(a *t35a7)tg5ts3 


2,0 
v°t35 t35t33 = 


2 
x°t33t35t33 = 
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(5.11) 
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(xt") =€ 
(wtf')? =e 
(ato)? =e 


rtgxtgoxto = € 


a(xa+)tgrtoxty = 


| 
o 


Pipe A 
# (eo to@ \tovitg: =e 
(5.12) 


| 
o 


rtd toxty = 
x tiotoxto =e 


x*(xx~)tiotgrtg = 


| 
© 


x (x~!)tyotox)tg = 6 


#*[troto|*to = e 

x ty toto = € 
Our first double coset, HeN = {He"|n € N} = {H}, which we will denote by [x]. 
The orbits of N on {1,2,3,4,5,6,8,7,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25, 
26,27,28,29,30,31,32,33,34,35,36,37,38,39,40} are {1,2,13,3,34,14,17,4,11,35,15,10,18, 
33,20,12,36,19,16,9} and {5,6,29,7,26,30,37,8,23,27,31,22,38,25,40,24,28,39,32,21}. 


We will take a representative from each orbit, say t; and t5, and determine to which 


double coset Ht; and Hts belong. 
Word of Length 1 


Ht,N is a new double coset which we will denote by [1]. 
At,N = {Ht,"|n € N}. 


Since the orbit {1, 2, 13, 3,34, 14, 17, 4, 11, 35, 15, 10, 18, 33, 20, 12, 36, 19, 16, 9} contains 


20 elements then 20 symmetric generators will go to the new double coset [1]. 


Now N® > A}, 


N? = {fe}. 
N® = Coset Stabiliser in N of Ht, = {n € N|Ht? = ty}. 


We will look for a relation that will increase the Coset Stabiliser N“). 


Atos = Htog, by Equation 5.10 

= Ha Ae 

— Htit} = Htht? 

——w he At3t} 

=> Ht, = Ht§[yxt§t}°], since by Equation 5.12 
rtitioty = e 

[x3 ty, tite] 7 = ery *x 

=>? aly ltyrtatis =e 

= gly tats =e 

=> aly thtat3ts = t§ 

=> aly leptaty? = thtg? 

=> gue ee = yatsts® 

SS Se 

Ht, = Ht8yat5t}° 

=> Ht, = Hyz{[t§}¥713t}° 

= Ae ai 

=> Ht, = Hiht? 

=> Ht, = Htj°t}, since by Equation 5.10 
Hto2 = Hto5 

=> [Ht]? = [Htos]" 
=> Atay = Hto3 

=> Hine Sie 

Hig = HER? 
Sine 

=> Ht, = Htz6 

Also, Ht; = Htz6 

=> [Ht]? Y = [Htz]" 7 


= Ht2¢6 = Atty, 


1 
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and 

At, = Ht3¢6 

—> [At] Y = [Ht36]”Y 

=> Aty = Ata, 

and 

Ht, = Htsg 

=> [Ht] = [Ht36]”” 

=> Ati = At. 

Thus, Ht; = Htsg = Ati, = Hty4 


Now, since Ht® = Ht; > e € N“), and 
Ht? 9" = tse = Ht, > xy"? e NO, 
Ht?! = Hty = Ht, > xy e NO, 

Ht!” = Hty = Ht, > yx € N“), then, 


N = Coset Stabiliser in N of Ht, = {n € NAD = th Leet ary yet 


IN| __ 20 _ 
[ING] ~~ 4 5. 


Furthermore, the number of single cosets of Ht, N is 


Conjugating by elements in N gives us the following equal names. 


ty ~ 136 ~ ti ~ tia ta ~ t35 ~ tio ~ fig 
to ~ t33 ~ te ~ tis ti7 ~ too ~ tig ~ tig 


t3 ~ t34 ~ to ~ te 


Therefore, At,N {Ht At36 Atyy Aty4, Hto Ats33 Aty2 Atis, 
tz At34 Htg Ati, Ht A t35 Atio At, 
Ati7 = Htoo = Ati9 Htis} 


Now N@) > NP. 
N® = fe}. 
N() = Coset Stabiliser in N of Hts = {n € N|Ht® = ts}. 
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We will look for a relation that will increase the Coset Stabiliser N©). 


Ato. = Htos, by Equation 5.10 
—> [Hty]|* 'Y = [Htos|" 
=> Hts = Htg. 

Also, 

Ato. = Hto5 

—> [Hto9|*Y'* = [Hts |"? 
=> Hts = Htz, 

and 

Atg2 = Hto5 

—> [Hta9]*9* = [Htos|"Y 
= Ht; = Hte, 

and 

At22 = Ht25 

— [Ht] = [Htos|Y” 

=> Hts = Hts, 


Thus Ats Ate Atyz tg 


Since Ht€ = Hts > e € N©), 

Ht? = Hts = Hts > x € N©), 

Ht?’ = Ht; = Hts > 2?inN©), 

Ht®’ = Htg = Hts > 2inN©), then, 

N©) = Coset Stabiliser in N of Hts = {n € N|(Hts)” = ts} = {e,2, 27,271}. 
|N|_ __ 20 


Furthermore, the number of single cosets of Ht5N is ING] = 4 = 5. 


Conjugating by elements in N gives us the following equal names. 


th ~ te ~ t7 ~ tg t32 ~ ta5 ~ to2 ~ t39 
tog ~ tog ~ to3 ~ tao t31 ~ tog ~ to1 ~ tag 


t30 ~ to7 ~ tog ~ t37 
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Thus HtsN {Hts Hts Aty A tg, Ata9 Ht Ata A tao, 
Ht39 = Hto7 = Htog = Ht37, Ht32 = Atos = Hto2 = Ht, 
At3, Htog = Ato, Ht3g}. 


The orbits of N“) are {1, 14, 11, 36}, {2, 35, 20, 9}, {3, 12, 13, 18}, {4, 17, 34, 15}, 
{5, 30, 23, 28}, {6, 27, 40, 21}, {7, 24, 29, 38}, {8, 37, 26, 31}, {10, 19, 16, 33}, and 
{22, 39, 32, 25}. 


We will check to see where tyt1, tito, tits, titi7, tits, tyto1, tyto9, t1t37, t1t33, and tytas 


belong. 


Hit; = He 
=> Att; = Hts 
=> Htyt; € [5], since Hts is in [5]. 


4 Symmetric generators will go to [5]. 


Htitg = Htyt} 

=> Htity = Ht} 

— Htity = Hty3 

=> Htytg € [1], since Hty3 is in [1]. 


4 Symmetric generators will go to [1]. 


Htyti3 = Htyt} 

=> Htitis = Ht} 

=> Htyt13 = Hty7 

=> Htyt13 € [1], since Hty7 is in [1]. 


4 Symmetric generators will go to [1]. 


Atyti7 = Htyt? 

=> Htyti7 = Ht® 

= Atty, = Ht, 

=> Htyti7 € [5], since Htg, is in [5]. 


4 Symmetric generators will go to [5]. 


Htits = Ht,t? 

=> HAtts = Ht} 

=> Atits = Htg 

=> Htits € [1], since Htg is in [1]. 


4 Symmetric generators will go to [1]. 


Htit21 = Htit$ 

=> HAtyte, = Att 

=> Atte, = Htos 

= > Htt21 € [5], since Htgs is in [5]. 


4 Symmetric generators will go to [5]. 


Atyito9 = Htit$ 
=> Atyto9 = Ht} 
=> Htytog = Ht33 


=> Htjtag € [1], since Ht33 is in [1]. 


4 Symmetric generators will go to [1]. 


Atit37 = Ht, t}° 
=> HAt,t37 = H 


=> Htyt37 € [1], since He is in [*]. 


4 Symmetric generators will go to [*]. 


Htit33 = Htyt? 

=> HAtit33 = Htt° 

=> Htyts3 = Ht37 

= > Htts3 € [5], since Ht37 is in [5]. 


4 Symmetric generators will go to [5]. 


Htytos = Htit? 
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=> Atytos = Ht® 
=> Atytes = Htag 
=> Htyteos € [5], since Htgo is in [5]. 


4 Symmetric generators will go to [5]. 
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The orbits of N©) are {1,2,3,4}, {5, 6, 7, 8}, {9, 10, 11, 12}, {13, 14, 15, 16}, {17, 
18, 19, 20}, {21, 22, 23, 24}, {25, 26, 27, 28}, {29, 30, 31, 32}, {33, 34, 35, 36}, and 


{37, 38, 39, 40}. 


We will check to see where t5ty, t5ts, t5tg, t5t13, tsti7, tsto1, tsto5, tstog, t5t33, and t5t37 


belong. 


Htst, = Httt 

= Fin = HG 

=> Atst; = Hto 

=> Htst, € [1], since Htg is in [1]. 


4 symmetric generators will go to [1]. 


Heig= AGH 

= Aists HG; 

=> Htsts = Hti3 

=> Htsts € [1], since Hty3 is in [1]. 


4 symmetric generators will go to [1]. 


Hsig= Hah 

= Aig =e 

=> Htstg = Hti7 

=> Htstg € [1], since Hty7 is in [1]. 


4 symmetric generators will go to [1]. 


Htsti3 = Ht?t} 
=> Atsti3 = Ht$ 


=> Atst13 = Ata) 


= > Htstig € [5], since Ht is in [5]. 


4 symmetric generators will go to [5]. 


Atsti7 = Het 
=> Atsti7 = Het 
=> Atsti7 = Htas 


= > Htsti7 € [5], since Htgs is in [5]. 


4 symmetric generators will go to [5]. 


Atsto, = Bet 
=> Htste,; = Ht 
=> Atsto1 = H tag 


= > Htste1 € [5], since Htgo is in [5]. 


4 symmetric generators will go to [5]. 


Htsto5 = Ht?t? 
= > Htstos = Ht} 
=> Atstos = A t33 


= > Htstes € [1], since Ht33 is in [1]. 


4 symmetric generators will go to [1]. 


Htstog = Ht?t§ 
= > Htstog = Ht 


= Htsto9 = Ht37 


=> Htsto9 € [5], since Ht37 is in [5]. 


4 symmetric generators will go to [5]. 


Htst33 = Ht?t? 
=> Htst33, = H 
=> Htsts33 € [x], since He is in [*]. 


4 symmetric generators will go to [ 
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Hisiae = AGM 
=> Htst37 = Ht, 
=> Htst37 € [1], since Ht; is in [1]. 


4 symmetric generators will go to [1]. 


This conclude our Double Coset Enumeration. Below is our Cayley Diagram. 


Figure 5.4: My, Over (C4: Cs). 


5.5 (S(4,3) : 2) as a Homomorphic Image of 2*"° : S; 


5.5.1 Factor by Center of G 


Let G & 2*70 : (24: $5) be a symmetric presentation of G given by 
1 1 1 1 


eye ee ga oe ae a 


eg ye hue es) ae ee ee) 


Geasa ie ay ey ay 


(t, (yey—')?), (t, yay?) >, where 

ax = (1,16,9,2, 15, 10)(3, 18, 11)(4, 17, 12)(5, 6) (7, 14, 19)(8, 13, 20), 
y = (1, 14, 15, 2, 13, 16)(3, 19, 6, 8, 18, 10, 4, 20, 5, 7, 17,9), 

N =< x,y >, and the order of N is 1920. 
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Let us factor the progenitor 2*7° : (24 : 95) by 
eye). oye yt oye Oe): 


The Composition Factors of G are given below. 
Cyclic (2) 


C2; 3) oa S(4, 3) 


Cyclic (2) 


However, now our control group has changed. 


> #sub<G|x,y>; 
120 


The order of N is 120 instead of 1920. 


We look at our original control group given by 
1 1 1 


Kole ay yey ey aie og ae a a ee re 


1 1 1 


Note that || = 6, |jzy~+| = 4, |yey~ta-2y~t aya) = 1, |yTta tye tytayre| = 1, 


and (x tyta ty |= 2 


We also note that | f(x)| = 3, |f(ay—!)| = 4, |f(yry a 2y layer ')| = 1, 
[f(y ta "ya ty *ayPx)| = 1, and |f(a-ty*a~*y~*)| = 2. 


So then we change our control group to the following symmetric representation. 
1 1 1 1 


Sai? (age) yey te ty oo a ee eg ee ye tg) 
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> NN:=Group<x, y|x°3, (x*y°-1) “4, y*xxx*xy°-1l*x°-2xy°-lxxxyx*x-l, 
> yOr-lxx*-Lxy*x7*-Ley°-laxxy°3«x, (x°-L*xy72*x7-lxy°-1)°2>; 

> #NN; 

120 


Our new control group of order 120 is a permutation representation of NN over the 


Stabiliser(V,1), which we will call H. 


> NN<x, y>:=Group<x,y|x°3, (x*y°-1) °4,yx*xx*xy > -1*x°-2*y°-L«exx«xyx*x*-l1, 
> yO-lxx*-Ley*x7*-Ley°-lexxy°3«x, (x°-L*xy72*x7*-ley°-1)°2>; 

> Hi=sub<NN|y*x*2*y°-2*x°-ley*x°-1,x°-Ll+y*-lex*-ley*—3exey°-1, 
> (yaxey ol) Spy Slax Sey a2; 

> #H; 

12 

> #NN; 

120 

> £,g1,k:=CosetAction (NN,H); 

> #91; 

120 

> #k; 

> gl; 


Permutation group gl acting on a set of cardinality 10 
Order = 120 = 2°73 * 3 * 5 
(1, 2, 4) (3, 5, 6) (7, 8, 10) 
(1, 3, 2) (4, 7, 5, 9, 6, 8) 
> Stabiliser(gl,1) eq sub<gl|f(H)>; 
true 


Now we check in MAGMA. 


> S:=Sym(10); 

> xx:=S!(1, 2, 4) (3, 5, 6) (7, 8, 10); 
2 VV SSS ily Sy 22) ap Tp Oe De Sip 8.3 
> N:=sub<S|xx,yy>; 

> #N; 

120 


> #sub<N|yy*xx*2*yy°-2*xx°-Lxyy*xx°-1,xx*-Lxyy°-1*xx*-1* 
> yy°-3*xxx«xyy°-1, (yy*xx*yy”-1) °3,yy*-1*xx*3*yy"-2>; 

12 
> Stabiliser(N,1) eq sub<N|yy*xx*2*yy°-2*xx*-lL*yy*xx°-1,xx~-1+* 


> yy -1lx*xx*-Lxyy*-3*xx*yy°-1, (yy*xx*yy°-1) °73,yy°-1*xx*3*yy°-2>; 
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true 

> s:=IsIsomorphic(N,Sym(5));s; 

true 

Therefore, G =< a, y, t|x°, (zy—!)4, yry-ta-2ylaya, yla lye ty layra, 


ee i ei yery te yet ae ety eae, ee 
= — 3 2} 2 2 
Garey ue age 2 ae eS 


is isomorphic to 


2*10: 5. 
[(xyt?? )6 (wyte? ve? )4, (ryte?y)8] ° 


The composition factors of G are given below. 


Cyclic (2) 


Now we want to factor G by C2 to obtain the following composition series for G, 


G= Gi 2) ae where G = (G1 /G2)(G2/1) = C25(4, 3). 


We find the Normal Lattice of G. 


> NL:=NormalLattice (Gl); 
> NL; 


Normal subgroup lattice 


[7] Order 103680 Length 1 Maximal Subgroups: 4 5 6 


[6] Order 5184 
[5] Order 5184 


[) 


Length 1 Maximal Subgroups: 3 
Length 1 Maximal Subgroups: 2 3 


[o) 
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[4 Order 51840 Length 1 Maximal Subgroups: 3 
ee Order 25920 Length 1 Maximal Subgroups: 
or Order 2 Length 1 Maximal Subgroups: 
at Order 1 Length 1 Maximal Subgroups: 


We see that NL[2] is of order 2. We check to see if NL[2] is equal to the center of G. 
> NL[2] eq Center(Gl); 
true 


We use our Schreier System to write the generators of N L[2] in terms of x,y, and t. 


> IN:=sub<G1|f(x),f(y)>; 


FH Fh 


~e 


> N:=IN; 

> #N; 

120 

> #G; 

103680 

> N:=G1; 

> NN:=G; 

> Sch:=SchreierSystem (NN, sub<NN|Id (NN) >); 

> ArrayP:=[Id(N): i in [1..103680]]; 

> for i in [2..103680] do 

for> P:=[Id(N): 1 in [1..#Sch[i]]]; 

for> for j in [1..#Sch[i]] do 

for|for> if Eltseq(Sch[i]) [Jj] eq 1 then P[j]:=f(x); end if; 
for|for> if Eltseq(Sch[i])[j] eq 2 then P[j]:=f(y); end if; 
for|for> if Eltseq(Sch[i])[j] eq -1 then P[j]:=f(x*-1); end 
for|for> if Eltseq(Sch[i])[j] eq -2 then P[j]:=f(y*-1); end 
for|for> if Eltseq(Sch[1i]) [Jj] eq 3 then P[j]:=f(t); end if; 
for|for> end for; 

for> PP:=Id(N); 


for> for k in [1..#P] do 

for|for> PP:=PP*P[k]; end for; 

for> ArrayP[1]:=PP; 

for> end for; 

> for i in [1..103680] do if ArrayP[i] eq NL[2].1 then Sch[il; 
for|if> end if; end for; 


~e 
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Id (G) 

> for 1 in [1..103680] do if ArrayP[i] eq NL[2].2 then Sch[i]; 
for|if> end if; end for; 

KX * t * KX * y*-l * kK * t ey eK ®t eK Ke y*-l * Ke t * y*-l 


* tC * X * t * y 


We now have the following presentation for G. 


1 1 a 1 


aye, yao yay aye, (ety? ty!) 


= ox ty ex! 3 es 3 
Myer we) ae ty ey ey) gay) ay eeu leu)", 
(cyt 9 )4, (xyt™¥)8, xtxy lxtyxtayxtyltrty >. 


Ge<cr,yile (ay )* dey a ty 


, 


The Composition Factors of G are, 


5.5.2 The Construction of (5(4,3) : 2) Over S; 

We are now ready to perform Double Coset Enumeration on the progenitor 
OF Se, 
factored by (xyt® )6, (cyt yr” )4, (xyt®’¥)8, xtey tatyxtry—taty—tety. 


Let G & 2*!9 : S$; be a symmetric presentation of G given by 
a 1 1 1 


yey De ea yee 


a a = _ _ ay 3 
Cue yer ye ne ty ae pray) ie uae)? ) a ae) (eye) 
(cyt yr” )4, (xyt™¥)8, xtey‘atyxtrytaty—!taty >, where 
N & Ss =< 2,y >, x = (1,2)(3, 4)(5,6)(7,8)(9, 10), and y = (1,3,5,7,9, 10,8, 6, 4, 2). 


<a tie (ay )* yey ey a tyr ty 


We will enter this presentation for G and label our permutations x and y as well as 


our control group, N =< x,y >, then verify that we have N & Ss. 


> G<x,y,t>:=Group<x,y,t|x°3, (x*y°-1) 74, yx*xxxy>-1L*x*-2*y"-Lxxx«y* 
> x°-1L,y°-1L*x*-Lxy*x°-Ley°-Lex«y*3*x, (x*-Lxey72*x°-l*xy°-1) 72, 


> t°2, (t,y*xx 2xy>-2*x > -Lxy*x°-1), (t,x°-Llxy°-1*x°-lxy°-3*«xx*y*-1), 
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> (t, (y*x*xy°-1) 73), (t,y°-1*x*3x*y*-2), (xxyxt* (x73) ) 76, (xxy*xt™ (x7 2« 
> yxx°2)) 74, (xxy*t? (x7 2ey)) 78, xxtxx«y > -Lexxtxyrxatr 
> xxy°-Lexetxy>-Letexatxy>; 
> S:=Sym(10); 
> xx:=S!(1,2,4) (3,5,6) (7,8,10); 
> yy:=S!(1,3,2) (4,7,5,9,6,8) ; 
> N:=sub<S|xx,yy>; 
> £,G61,k:=CosetAction (G, sub<G|x,y>); 
> CompositionFactors (Gl); 
G 
Cyclic (2) 
* 
C(2, 3) = S(4, 3) 


> s eS soneonae (N,Sym(5));S; 

true 

We then use MAGMA to calculate the number of double cosets of G over N as 
well as to name our t?. Note that when naming our t;’s, t; = t, then tg = 2”, 
since x = (1,2,4)(3,5,6)(7,8,10) takes t, to tg. Similarily, t3 = t¥, since y = 
(1,3, 2)(4, 7,5, 9, 6,8) takes t; to tg, also t4 = {2 since x? = (1,4, 2)(3, 6,5)(7, 10, 8) 


takes t; to t4. This process is repeated until all of our t;’s have been named. 


> #DoubleCosets (G, sub<G|x, y>, sub<G|x,y>) ; 
20 


Vv 


IN:=sub<G1|f(x),f(y)>; 


> ts := [Id(Gl): i in [1 .. 10] J]; 

> ts[l]:=f(t); ts[2]:=f£(t*x); ts[3]:=f(t*y); ts[4]:=f (t* (x*2)); 
> ts[5]:=f(t* (y*x)); ts[6]:=f(t* (y*x*2)); ts[7]:=f (t* (x*2xy)); 
> ts[8]:=f (t* (x°2*y*x)); ts[9]:=f (t* (y*xxy)); 

> ts[10] :=f (t* (x°2*y*x"2)); 


So we will have 20 double cosets. The number of single cosets is equal to 


it = ae = 432. We will use the following loop to keep count of the single cosets. 
It is important in this loop that we input the number of ¢;’s that we have, 10, as well 


as the number of single cosets that we have, 432. The coset counter will give us a 


running total of how many single cosets we have thus far, starting with our second 


double coset [1]. It does not keep count of the 1 single coset in [*]. 
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prodim:=function(pt, Q, I) 
ncetion> v:=pt; 
netion> for i in I do 

netion|for> v := v*(Q[i]); 

netion|for> end for; 

nction> return v; 

ncetion> end function; 

> #G/#N; 

432 

> cst := [null : i in [1 .. Index(G,sub<G|x,y>)]] where null is 
> [Integers() | ]; 

> for i := 1 to 10 do 

for> cst[prodim(1, ts, [1i])] := [i]; 

for> end for; 

> m:=0; for i in [1..432] do if cst[i] ne [] 

for|if> then m:=mt+1; end if; end for; m; 

10 


G GaGa GaGa 


Words of Length 1 


Our first double coset is NeN, denoted by [x]. 


[+] = = = 3 = 1 single coset. 


> Orbits (N); 


[ 
GSet{@ 1, 2, 3, 4, 5, 7, 6, 9, 8, 10 @} 


The orbit of N on {1,2,3,4,5,6,7,8,9,10} is {1,2,3,4,5,6,7,8,9,10}. We pick a 
representative from the orbit, say 1, and determine the double coset that contains 


Nt. 
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Nt,N is anew double coset which we will denote by [1]. Since the orbit {1,2,3,4,5,6,7,8,9,10} 
contains ten elements, then ten symmetric generators will go to the new double coset 


[1]. Recall that our coset counter, m, was at 10. 


We will now examine our double coset [1]. Our representative of this double coset is 
Nt,. The following code labels the point stabiliser of 1 in N as N1. Then we label 
the set SSS, which is made up of t; conjugated by all of the elements of NV. 


N1:=Stabiliser(N, [1]); 
SSS:={[1]}; 
SSS:=SSS°N; 

#SSS; 

0 

> Seqq:=Setseq(SSS); 


PVV VV 


The next loop tells us if we have any equal names, that is, if any of our cosets in [1] 


are equal to each other. 


> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[1] eq 

for|for|if> nxts[Rep(Seqq[i]) [1] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 
obi 
> Nis:=N1; 


From the above loop we see that there are not any equal names in [1]. Thus the 
coset stabiliser of 1 in N is equal to the point stabiliser of 1 in N. We compute the 
transversals of N@) in N and label this as T1. Then we use our coset counter to see 


how many single cosets we have thus far. 


> Tl:=Transversal (N,N1s); 

> fOr atm [vs El) do 

for> ss:=[1]°T1[il]; 

for> cst[prodim(l1, ts, ss)]:=ss; 

for> end for; 

> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 

10 
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Now we can use MAGMA to find the elements in the set N“). To find the distinct 
single cosets in [1], we first find the transversals, then conjugate Nt, by each of the 


elements in the set of transversals. 


> #N1s; 
12 
> Set (N1s); 


Id (Nl), 
(2, 6, 9, 3, 4, 7) (5, 10, 8), 
(2 WSs, “GCS MOVs 

(2 ON.(8;. “TCS 5 210Y > 

Gy Tay Sp. Os. 26), (52 Sy “105 
(Dip Gin ASS Tp 6) hey. Sy: Og 
(4, 9) (5, 8) (6, 7), 

(2, 6) (3, 4) (7, 9) (8, 10), 
(2 TVASs dae 6) 155.10}; 
(Zor Be OV 6p FAS, 0; By 
(2, 3) (4, 6) (7, 9), 

(2, 3) (4, 7) (5, 8) (6, 9) 


> for iin [1..#T1l] do ([1]“Nls)*T1[i]; end for; 


@} 
{@ 


247 


@} 
{@ 


@} 
{@ 


@} 
{@ 


10 | 
@} 


Ni = NO = {e, (2,6, 9,3, 4, 7)(5, 10, 8), (2, 4)(3, 6)(8, 10), (2, 9)(3, 7)(5, 10), (2, 9, 4)(3, 7, 6) 
(5, 8, 10), (2, 7, 4, 3, 9, 6)(5, 8, 10), (2, 6)(3, 4)(7, 9)(8, 10), (4, 9)(5, 8) (6, 7), (2, 7)(3, 9) (4, 6) 
(5, 10), (2, 4, 9)(3, 6, 7)(5, 10, 8), (2,3)(4, 6)(7, 9), (2, 3)(4, 7)(5, 8)(6, 9)}. 

[N| 120 _ 


The number of single cosets in Nt, N is [vo] = 45 = 10. 


NtN ={Nty, Nto, Nts, Nts, Nts, Nt, Nt7, Nts, Ntg, Ntio}-. 


Lastly, we need to compute the orbits of N@). 


> Orbits (N1ls); 


GSet{@ 1 @}, 
GSet{@ 5, 10, 8 @}, 
GSet{@ 2, 7, 4, 6, 9, 3 @} 


The orbits of the coset stabilier N“ on {1,2,3,4,5,6,7,8,9, 10} are 
{1}, {5,10,8}, and {2,7, 4,3, 6, 9}. 


We take t;, t5, and tg from each orbit respectively. 


We want to determine to which double coset Nt1t1, Ntits, and Nt,t2 belong. 


Nt,t; = N € [x] (Since our t’s are of order 2.) 
Since the orbit {1} contains one element, then one symmetric generator goes back to 


the double coset [x]. 
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Now, so far we have found the double cosets [*] and [1]. We will use the following 
loop to see if Nt ts, and Nt ,t2 belong in these double cosets. If not, then then they 


will go on to a new double coset. 


> for m,n in IN do if ts[l]*ts[5] eq m«(ts[l]*ts[1])*n 


for|if> then "true"; break; end if; end for; 

> 

> for m,n in IN do if ts[l]*ts[5] eq m*(ts[1])7n 
for|if> then "true"; break; end if; end for; 

> 

> for m,n in IN do if ts[l]*ts[2] eq m«(ts[l]*ts[1])*n 
for|if> then "true"; break; end if; end for; 

> 

> for m,n in IN do if ts[l]*ts[2] eq m*(ts[1])7n 
for|if> then "true"; break; end if; end for; 

> 


Since MAGMA did not return any output with the above loop, then we have two new 


double cosets. 


Nt,tsN is a new double coset which we will denote [15]. 
Since the orbit {5,10,8} contains three elements, then three symmetric generators 


will go to the new double coset [15]. 


Nt,t2N is a new double coset which we will denote [12]. 
Since the orbit {2,7,4,3,6,9} contains six elements, then six symmetric generators 


will go to the new double coset [12]. 


Words of Length 2 


Now we move on to our first double coset of length 2. In the same manner as before 


we look for equal names. 


N15:=Stabiliser(N, [1,5]); 
SSS2={L15 57 }4 

SSS:=SSS°N; 

#SSS; 
0 


WV VV V 
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> Seqq:=Setseq(SSS); 

> 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]x*ts[5] eq 

for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ] 
for|for|if> then print Rep(Seqq[i]); 

for|for|if> end if; end for; end for; 

[ 1, 5 ] 


Since we do not have a relation that will increase our coset stabiliser, then N1° = 


N95), We input this and check our coset counter. 


> T15:=Transversal (N,N15s); 

> for i in [1..#T15] do 

for> ss:=[1,5]°T15[i]; 

for> cst[prodim(1, ts, ss)]:=ss; 
for> end for; 


> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 
40 


Our coset counter has increased from 10 to 40. We should have 30 distinct single 


cosets in [15]. We find the distinct single cosets as well as the orbits of N(@), 


> [1,5]°N15s; 
GSet {@ 
[ 1, 5 ] 
@} 
> for a. an [la c#TL5]. do. (i1,5)7N15s) "115: [a )4 -end. £0r; 
{@ 


[odes ed 
@} 
{@ 

fet G: Oe 
@} 
{@ 

Pele od 
@} 
{@ 

[ 2, 6 ] 


@} 
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[ 7, 2 ] 
@} 
{@ 

[ 7, 4 ] 
@} 
{@ 

Kk pe Said 
@} 
{@ 

[ 8, 1 ] 
@} 
{@ 

[ 8, 6 ] 
@} 
{@ 

fe Bie. 4 
@} 
{@ 

Devos 
@} 
{@ 

Lap od 
@} 
{@ 

[Be ol 
@} 
{@ 

[Oye 24 4 
@} 
{@ 

[ -EO% "2: ] 
@} 
{@ 

[i LO Se] 
@} 


> Orbits(N15s); 


GSet{@ 1 @}, 

GSet{@ 5 @}, 

GSet{@ 7, 9 @}, 
GSet{@ 8, 10 @}, 
GSet{@ 2, 6, 4, 3 @} 
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N(5) = fe, (24)(36) (810), (26)(34)(79)(810), (23)(46)(79)}. The number of the single 


cosets in the double coset Nt,ts.N is at most was = 10 = 30. 


Ntit5N = {Ntyts, Ntitio, Ntitg, Ntote, Ntot7, Ntotio, Ntst9, Ntztio, Ntgta, Ntatz3, Ntats, 
Ntat7, Ntsto, Ntst7, Ntst,, Ntgto, Ntets, Ntgte, Ntvte, Nt7ta, Nt7vts, Ntgt,, Ntgte, Ntgta, 
Ntgte, Ntgts, Ntgt3, Ntiot1, Ntiote, Ntiots}. 


Similarily we examine our other double coset [12]. 


N12:=Stabiliser(N, [1,2]); 
SSS:={[1,2]}; 

SSS:=SSS°N; 

#SSS; 

0 

> Seqq:=Setseq(SSS) ; 

> 

> for iin [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]*ts[2] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 
[bya] 

[ 1, 3 ] 


NY VV VV 


MAGMA tells us that Nt,to = Nt t3. So we now have a relation that increases N (12) 


We enter these equal names with the following code and check our coset counter. 


> N12s:=N12; 
> for n in N do if 1°n eq 1 and 27n eq 3 then 
for|if> N12s:=sub<N|N12s,n>; end if; end for; 
> N12s; #N12s; 
Permutation group N12s acting on a set of cardinality 10 
(4, 9) (5, 8) (6, 7) 
(2, 3) (4, 7) (5, 8) (6, 9) 
(2, 3) (4, 6) (7, 9) 


4 

> #N/#N12s; 

30 

> T12:=Transversal(N,N12s); 
> for i in [1..#T12] do 
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for> ss:=[1,2]°T12[i]; 

for> cst[prodim(1, ts, ss)]:=ss; 
for> end for; 
> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 

70 


Our coset counter is now at 70, so we must have 30 distinct single cosets in [12]. We 


will find the distinct single cosets as well as the orbits of N“@2). 


> #N12s; 

4 

> Set (N12s); 

{ 
(2, 3) (4, 7) (5, 8) (6, 9), 
(4, 9) (5, 8) (6, 7), 
(2, 3) (4, 6) (7, 9), 
Id(N12s) 


> for iin [1..#T12] do ([1,2]7N12s)°T12[i]; end for; 


[ 1, 2 ], 
[ 1, 3 ] 
@} 
{@ 
[ 1, ], 
[ 1, 4 ] 
@} 
{@ 
[ 1, 7 ], 
Lda 92 J 
@} 
{@ 
cee age 
2, 5 
@} 
{@ 
2, ’ 
De a 
@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 
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@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
{@ 


@} 
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{@ 
[ 10, l, 
[ LO, Fo] 
@} 
{@ 
EP LOy,- “4e 21% 
[ 10, ] 
@} 
{@ 
[ 10, 8 ], 
[OF 152 
@} 


> Orbits (N12s); 

[ 
GSet{@ 1 @}, 
GSet{@ 10 @}, 
GSet{@ 2, 3 @}, 
GSet{@ 5, 8 @}, 
GSet{@ 4, 9, 7, 6 @} 


N(!2) = fe, (23)(47)(58)(69), (49)(58) (67), (23)(46)(79)}. The number of the single 
|N| 120 


cosets in the double coset Nt,toN is at most [No] = = 30. 

NtitoN = {Ntitg = Ntyt3, Ntits = Ntita, Ntity = Ntito, Ntota = Ntots, 

Ntots = Ntot, Ntoto = Ntotg, Ntgt; = Ntgto, Ntgts = Ntst7, Ntgte = Ntsts, 
Ntaty = Ntate, Ntats = Ntato, Ntatio = Ntato, Ntsto = Ntsta, Ntstio = Nests, 
Ntst3 = Ntste, Nteta = Nteti, Ntgt7 = Ntetio, Ntets = Ntgts, Ntrt3 = Netrts, 
Ntrtg = Ntrt1, Ntrtio = Nt7te, Ntgto = Ntgto, Ntgty = Ntgt3, Nigts = Ntgtio, 
Ntgty = Ntot7, Ntota = Ntotio, Ntotg = Ntgto, Ntiote = Ntiot7, Ntiota = Ntioto, 
Ntiots = Ntiots} 


So far we have G= NUNt,NUNtit5N U NtitoN. 
Which gives us 1 + 10 + 30+ 30 = 71 distinct cosets. 


Now we check the orbits of N“@®) and N(@2) to see where our single cosets go. 
The orbits of N@5) on {1,2,3,4,5,6,7,8,9,10} are {1}, {5}, {7,9}, {8,10}, and 
{2,6,4,3}. We take t,, ts, t7, tg, and tg from the orbits of N“5). We want to de- 
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termine to which double coset Nt,t5t1, Ntitsts, Ntitst7, Ntitstg and Ntyts5t2 belong. 


The double cosets that we have thus far are |*], [1], [15], and [12]. 


We will use the 


following loop to see which cosets will go to these double cosets, those that do not, 


will form new double cosets. We will make sure to add these new double cosets to 


our loop as we find them. 


> for m,n in 
for|if> then 
> form, nin 
for|if> then 
> for m,n in 
for|if> then 
> for m,n in 
for|if> then 
> 


ue"; 


do if t 


do if t 


ue"; 


do if t 


ul ns 
do if 


Cs 


en 


CS 


ue"; break; en 


d 


eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
BO 


Ntitst;N is a new double coset which we will denote [151]. 


One symmetric generator goes to the new double coset [151]. 


for m,n in 


for m,n in 


Mrmhh hah 


Po 


then 


r|if> 


if> then 
e 
or m,n in 
if> then 
or m,n in 
if> then 
or m,n in 


ry 


if> then 


Ntitsts € [1]. 


IN do if ts[l]*ts[5]*«ts 
"true"; break; end if; 
IN do if ts[l]*ts[5]*«ts 
"true"; break; end if; 
IN do if ts[l]*ts[5]<*«ts 
"true"; break; end if; 
IN do if ts[l]*ts[5]*«ts 
"true"; break; end if; 
IN do if ts[l]*ts[5]<*«ts 
"true"; break; end if; 


One symmetric generator goes back to [1]. 


[5] 
end 
[5] 
end 


[5] 
end 
[5] 
end 
[5] 
end 


> for m,n in IN do if ts[1]«ts[5]*ts[7] 
for|if> then 


here: 


break; 


end if; 


end 


eq mx ( 
for; 
eq mx ( 
for; 


eq mx ( 
for; 
eq mx ( 
for; 
eq mx ( 
for; 


ts[l]*xts[1])“n 
ts[l])7n 

ts[l]*ts[5])“n 
ts[l]*ts[2])“n 


ts[l]«xts[1])7n 


ts[1])7n 


ts[l]«ts[5])*n 


ts[l]«ts[2])7n 


ts[l]«ts[5]«ts[1l1])7n 


eq m«x(ts[1l]*ts[1])7n 


for; 


Hh 
(0) 
Rot 


Fh 


Hh 
(e) 
Hh oH 


Hh 
(0) 
Hh WK 


Kh 
e) 
) 


do if ts[ 


1)]* 


CS 


do if 


ts [4 


ue"; break; en 


|* 


CS 


do if ts 


ue"; break; en 


1j* 


CS 


do if ts 


ue"; break; en 
fl]x« 


ue"; break; en 


CS 


eq m 
for; 
eq m 
for; 
eq m 
amen ar 
eq m 
for; 


Ntytst7N is a new double coset which we will denote [157]. 


Two symmetric generators will go to the new double coset [157]. 


in 
if> then 
in 
if> then 
in 
then 
in 
if> then 
in 
if> then 
in 
then 


do if ts[ 


ue"; 


1j* 


CS 


ue"; 


do if ts[1] 


en 


5] x* 
d if 


CS 


do if 
ue"; 


break; 
ts[1] 


5] x 
d if 


do if 


break; 
ts [1] 


5]x* 
d if 


ue"; break; 
do if ts[1] 


5]x* 
d if 


We 
uc; 


break; 
do if ts[1] 
ue"; break; en 


* 


en 


5] x 
Ge a£ 


CS 


5] x 
Gi a £ 


y 


en 


eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
LOK; 
eq m 
for; 
eq m 
for; 


NtitstgN is a new double coset which we will denote [158]. 


Two symmetric generators will go to the new double coset [158]. 


in 
then 
in 
then 
in 
then 
in 
if> then 
in 
if> then 
in 


mh V 
fe) 
th Kt 
O 
Kh 
3 
a] 


Fh Hh 
e) e) 
mR Mh 


Hh 
1) 
Hh WK 


Hh 
(e) 
Hh WK 


eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
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xts[1])7n 

)*n 

«ts )*n 

«ts eon 

«ts xts[1])7n 
«ts xts[7])7n 
xts[1])7n 

)*n 

«ts )*n 
xts[2])7n 


for|if> then 


true 


We 


rue"; 


break; 


end if; 


end 


> for m,n in IN do if ts[1l]*ts[5]*«ts[2] 


for|if> then 


> 


Ntyt5to € [157] s 


We 


rue"; 


break; 


end if; 


Four symmetric generators go to [157]. 


end 


for; 
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eq m«(ts[1l]*ts[5]*ts[8])*n 


for; 


The orbits of N@?) on {1,2,3,4,5,6,7,8,9,10} are {1}, {10}, {2,3}, {5,8}, and 
{4,9,7,6}. We take t1, tio, ta, ts, and t4 from the orbits of N@2). We want to de- 
termine to which double coset Ntitat,, Ntitotio, Ntitote, Ntitets, and Ntytot4 belong. 


> for m,n in 
for|if> then 
for m,n in 
for|if> then 
£OxX Mn ain 
for|if> then 
for m,n in 
for|if> then 
for m,n in 
for|if> then 
for m,n in 


for|if> then 
for m,n in 


for|if> then 


IN 


do if t 


rue"; 


do if 


end if; 


true; 
do if t 


end if; 


true"; 


Go: wack 


true"; 


break; 
tel 


* 


end if; 


do: ae Ate 
true"; 


break; 


|* 


end if; 


do if t 
true"; 


|* 


end if; 


do if 


1S 


|x 


end if; 


ts[2]x*«ts[ 
ts[2]x*«ts[ 
ts[2]*ts[1] 
ts[2]*«ts[1] 
ts[2]*«ts[1] 
ts[2]*«ts[1] 


[l]«ts[2]«ts[1] 
true"; break; end if; end 


end 


end 


eq mx (t 


for; 


eq mx (1 


LOK? 


eq mx (t 


for; 


eq mx (t 


for; 


eq mx (t 


for; 


eq mx (1 


for; 


eq mx (t 


for; 


Nt,tgt;N is a new double coset which we will denote [121]. 


One symmetric generator will go to the new double coset [121]. 


for|if> then 


for|if> then 


for|if> then 


IN 


We 


IN 


do if ts[l]«ts[2]«*«ts 
true"; break; end if; 
do if ts[l]«ts[2]«*«ts 
true"; break; end if; 
do if ts[l]x«ts[2]*ts 
true"; break; end if; 
do if ts[l]«ts[2]«ts 


eq m 
for; 
eq m 
for; 
eq m 
for; 


eq m 


J*ts[1l])7n 


for|if> then 
> for m,n in 
for|if> then 
> for m,n in 
for|if> then 
> for m,n in 
for|if> then 
> for m,n in 
for|if> then 
> 


"true"; break; end if; end 
IN do if ts[l]*ts «ts[10] 
"true"; break; end if; end 
IN do if ts[l]*ts xts[10 
"true"; break; end if; end 
IN do if ts[l]*ts xts[10] 
"true"; break; end if; end 
IN do if ts[l]*ts xts[10 
"true"; break; end if; end 


for; 
eq m 
for; 


eq mx (1 


for; 


eq mx (1 


for; 


eq mx (1 


for; 


NtytgtioN is a new double coset which we will denote [1210]. 


One symmetric generator will go to the new double coset [1210]. 


> for m,n in 
for|if> then 
> for m,n in 
for|if> 
true 
for m, 
if> 
for m, 
if> 
for m, 
af 
for m, 
if> 
for m, 
if> 
for m, 
if> 
for m, 
for|if> 
> 


then 


in 
en 
in 


Hh 
(0) 
Hh WK 


en 
in 


Fh 
Oo 
aD) 


en 
in 


Hh 
(0) 
Hh WK 


en 
in 


Fh 
Oo 
aD) 


en 
in 
en 


Hh 
(e) 
Hh WK 


Hh 
(0) 
Hh oH 


in 
en 


Ntytote € [1] . 


Two symmetric generators go back to [1]. 


> for m,n in 
for|if> then 
> for m,n in 


IN do if ts[l]*«ts[2]«ts[2] 
"true"; break; end if; end 
IN do if ts[l]*«ts[2]«ts[2] 
"true"; break; end if; end 
IN do if ts[l]*ts xts[2] 
"true"; break; end if; end 
IN do if ts[l]*«ts[2]«ts[2] 
"true"; break; end if; end 
IN do if ts[l]*ts xts[2] 
"true"; break; end if; end 
IN do if ts[l]*«ts[2]«ts[2] 
"true"; break; end if; end 
IN do if ts[l]*ts xts[2] 
"true"; break; end if; end 
IN do if ts[l]*ts[2]«ts[2] 
"true"; break; end if; end 
IN do if ts[l]*«ts[2]«ts[2] 
"true"; break; end if; end 
IN do if ts[l]«*ts[2]*ts[5] 
"true"; break; end if; end 
IN do if ts[l]*ts[2]«ts[5] 


eq mx (t 


for; 


eq mx (1 


for; 


eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 


eq m 
for; 


eq mx ( 
for; 
eq mx ( 


ts[l])7n 
ts[l]xts 
ts[l]xts 
ts[l]xts 
ts[l]xts 
ts *ts 
ts[l]«ts[ 
ts[l]«ts[ 


ts[1])7n 
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ts[l]«xts[1])7n 


J«tsl[ 


J«tsl[ 


J«tsl[ 


«ts[ 


for|if> then 
> for m,n in 
for|if> then 
> “fox! m,n. an 
for|if> then 
> for im, A an 
for|if> then 
> for m,n in 
for|if> then 
> for man an 
for|if> then 
> for m,n in 
for|if> then 
> for m,n in 
for|if> then 
> 


"true"; break; end if; 
IN do if ts[l]«ts[2]+* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]+* 
"true"; break; end if; 
IN do if ts[l]«ts[2]+* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]+* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]* 
"true"; break; end if; 
IN do if ts[l]«ts[2]* 
"true"; break; end if; 


eo 


for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 


NtitgtsN is a new double coset which we will denote [125]. 


Two symmetric generators will go to the new double coset [125]. 


Ntytota € [157] . 


IN do if ts[l]«ts[2]+* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]+* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]* 
"true"; break; end if; 
IN do if ts[l]x*ts[2]* 
"true"; break; end if; 
IN do if ts[l]«*ts[2]* 
"true"; break; end if; 
IN do if ts[l]«ts[2]+* 
"true"; break; end if; 
IN do if ts[l]*«ts[2]* 
"true"; break; end if; 
IN do if ts[l]«*«ts[2]* 
"true"; break; end if; 
IN do if ts[1]*ts[2]* 
"true"; break; end if; 


ts[4 


en 


] 
d 
] 
d 
] 
d 


ts[l]*«ts[5]) 
ts[l]*«ts[2]) 
ts «ts[5] 
ts[l]«ts[5] 
ts[l]«ts[5] 
ts[l]*«ts[2] 
ts[l]«ts[2] 
ts[l]«ts[1]) 
ts[1])7n 
ts[l]«ts[5]) 
ts[l]«ts[2]) 
ts[l]«ts[5] 
ts[l]«ts[5] 


ts[l]«ts[2] «1 


ts[l]«ts[2] «t 
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Four symmetric generators go to [157]. 


Words of Length 3 


We continue in the same manner above. Our MAGMA code can be found in appendix. 


N51) — fe, (26)(34)(79) (810), (14)(35)(710), (163) (245) (8910), (1256) (34) (79810), (15) 
(2364) (71098), (164) (235) (7109), (136) (254) (8109), (15) (2463) (78910), (1354) (26) (78109), 
(16)(25)(910), (1453) (26) (79108), (146) (253)(7910), (24) (36) (810), (13) (45) (89), (15) (26) (78) 
(910), (12) (56) (78), (123) (456) (798), (23) (46) (79), (124) (356) (7810), (142) (365) (7108), (15) 
(34) (710) (89), (132) (465) (789), (1652)(34)(71089)}. The number of the single cosets 

in the double coset Ntt5t;.N is at most oss] = See: 

NtytstiN ={Ntytst; = Ntoteto = Ntat3ta = Ntgtatz = Ntstits = Ntgtote, Ntgtots = 
Nttgt; = Ntrtoty = Ntot7te = Ntotsta = Ntgtits, Ntstots = NtotioNte = Ntgtats = 
Ntatgt4 = Ntotstg = Ntiotatio, Ntetote = Ntat7vta = Ntiotitio = Ntitioti = 
Ntgteto = Ntrtat7, Ntgtgts = Ntst7ts = Ntiotstio = Ntstiot3 = Ntgtgtg = Ntrtst7}. 


N57) = f{e, (24)(36)(810)}. The number of the single cosets in the double coset 
|N| 


Ntitst7N is at most Twos] = 120 — — 60. 

Ntitst7N = {Ntitst7, Ntitsto, Ntitgte, Ntitgta, Ntitiots, Ntitiote, Ntatets, Ntotets, Ntatiots, 
Ntgtioti, Ntgt7ts, Ntot7ts, Ntgtots, Ntgtote, Ntgtatg, Ntztat7, Ntgtiote, Ntztioti, Ntatstio, 
Ntat3t9, Ntat7ts, Ntat7te, Ntatgte, Ntatgt1, Ntstote, Ntstgts3, Ntstitio, Ntstits, Ntstvta, 
Ntst7t2, Ntgtot3, Ntetots, Ntetat7, Ntetatio, Ntetsti, Ntetsta, Ntvtetio, Nt7tote, Nt7tsto, 
Ntzts5t1, Ntztatg, Ntztat3, Ntgtitio, Ntgtits, Ntgtat7, Nigtat3, Ntgtgto, Ntgtete, Ntotets, 
Ntotet2, Ntotstio, Ntotsts, Ntotst7, Ntotsti, Ntiotits, Ntiotits, Ntiotste, Ntiotsta, 

Ntiotat7, Ntiotate } 


N(1H58) = {e, (24)(36)(810), (26)(34)(79) (810), (23)(46)(79)}. The number of the sin- 


IN| __ = 
|N(158) | = Ae = 30. 


gle cosets in the double coset Nt tstgN is at most 
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NtytstgN = {Ntytstg = Ntytstio, Ntitiots = Ntitiotg, Ntitgtio = Ntitgts, Ntotetio = 
Ntotet7, Ntotrts = Ntotrtio, Ntotiot7 = Ntotiots, Ntgtota = Ntgtotio, Ntgtioto = 
Ntgtiota, Ntgtatio = Ntgtatg, Ntatgt7 = Ntatgtg, Ntatgts = Ntatgt7, Ntat7tz = Ntatrts, 
Ntstot; = Ntstot7, Ntst7t, = Ntstrt9, Ntstit7 = Ntstito, Ntgtote = Ntgtots, Ntgtgto = 
Nitgtgto, Ntgtoto = Ntgtotg, Ntrtots = Ntrtota, Ntytats = Ntrtat, Ntztste = Ntrtsta, 
Ntgtita = Ntgtitg, Ntgtgt: = Ntgteta, Ntgtate = Ntgtat;, Ntott3 = Ntotets, Ntgtst3 = 
Nigtstg, Ntotsts = Ntotats, Ntiotits = Ntiotite, Ntiotet: = Ntiotets, Ntiotst: = 
Ntiotsto}. 


N(@21) = {e, (49)(58)(67), (123) (456) (798), (123) (486957), (23) (46) (79), (13) (45) (89), (12) (56) 
(78), (13) (48) (59) (67), (23) (47) (58) (69), (132) (465) (789), (132) (475968), (12)(49)(57) (68 
The number of the single cosets in the double coset Nt tgt;N is at most INC INT = 
= 10. 


NtytotiN = {Ntytet = Ntgtit3 = Ntgt3t2 = Ntotite = Ntit3t, = Ntgtet3, Ntotate = 
Ntstots = Ntatst4 = Ntatota = Ntotsto = Ntstats, Ntatita = Ntgtats = Ntiteti 
Ntytat; = Ntateta = Ntgtite, Ntit7t; = Ntotito = Ntrtot7 = Ntrtit7 = Ntytoty 
Ntgtrtg, Ntstgt3 = Ntrtst7 = Ntgt7tg = Ntgtstg = Nt3t7t3 = Ntztgt7, Ntgtots = 
Ntgtgty = Ntgtote = Ntgtgto = Ntgtotg = Ntototg, Ntstgts = Ntgtsts = Nt3tets 
Ntgtstz = Ntstets = Ntgtsts, Ntatiota = Ntgtato = Ntiototio = Ntiotatio = 
Ntatota = Ntgtioto, Ntstiots = Ntgtstg = Ntiotstio = Ntiotstio = Ntstgts = 
Niégtiotg, Ntgt7tg = Ntyotetio = Ntrtioty = Ntrtety = Ntetiots = Ntiot7tio}. 


N(210) — fe, (23)(47)(58)(69), (49) (58) (67), (23)(46)(79)}. The number of the single 
cosets in the double coset Nt totigN is at most aay = = i = 30. 

NtitotioN = {Ntiteatio = Ntyt3tio, Ntit7ts5 = Ntitots, Ntitets = Ntitatg, Ntotat7 = 
Ntotst7, Ntotots = Ntotgte, Ntotstio = Ntotitio, Ntstitio = Ntstetio, Ntsteto = 
Ntgtsto, Ntgtgta = Ntgt7t4, Ntatits = Ntatgts, Ntatiot3 = Ntatgt3, Ntatst7 = Ntatatz, 
Ntstot7 = Ntstat7, Ntstgto = Ntstgto, Ntstioti = Ntstst:, Ntgtats = Ntetits, Ntetsto = 
Ntetsto, Ntet7t, = Ntetiote, Ntrt3t4 = Ntvtgta, Ntztiote = Nt7tete, Ntztots = Ntvtits, 
Ntgtote = Nigtots, Ntgtst; = Ntgtioti, Ntgt7ta = Nigt3ta, Ntgtits = Ntgt7ts, Ntotgts = 
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Ntotote, Ntgtatz = Ntotiot3, Ntiotete = Ntiotv7te, Ntiotgti = Ntiotsti, Ntiotat3 = 
Ntyiotots}. 


N(25) — fe, (13)(45) (89), (12) (56) (78), (23) (46) (79), (123) (456) (798), (132) (465) (789)}. 


The number of the single cosets in the double coset Nt tgt5N is at most ees oe 


[Aecazs 
120 _ 
120: = 90, 


NttotsN = {Ntytots = Ntotgts = Ntgtitg = Ntytgts = Ntgtota = Ntotite, Ntgtity = 
Ntytotg = Ntgt3t7 = Ntgtotg = Ntotit7 = Ntytgtg, Ntstet; = Ntgtate = Ntatst3 = 
Ntstaty = Ntgtotz = Ntotste, Ntatotg = Ntotstio = Ntstato = Ntatstg = Ntstotg = 
Ntgtatio, Ntatitz = Ntitets = Ntgtato = Ntatgts = Ntgtite = Ntytats, Ntgtito = 
Ntytatio = Ntatet7 = Ntetato = Ntatity = Ntitetio, Ntotitz = Ntit7ts = Ntrtote = 
Ntgt7t3 = Ntrtit2 = Ntytotg, Nt7tit4 = Ntytotio = Ntotvts = Ntrtota = Ntgtitg = 
Ntytrtio, Ntrt3t2 = Ntgtgto = Ntgt7t) = Ntrtgto = Ntgt3t; = Ntgtrto, Ntgt7ts = 
Ntrtgts = Ntgtgtio = Ntgtsts = Nt3t7tio = Ntrtgts, Ntgtot: = Ntotot7 = Ntotgt3 = 
Nigtgt = Ntototz = Ntotgt7, Ntgtots = Ntotgtio = Ntgtots = Ntotgts = Ntgtota = 
Ntotgtio, Ntgt3te = Ntgtst4 = Ntstet, = Ntgtstg = Ntst3t; = Ntgtets, Ntstst7 = 
Ntgtetio = Ntetstg = Ntstet7 = Ntgt3ts = Ntgtstio, Ntotate = Ntatiot7 = Ntiotot: = 
Ntotiots = Ntiotatr = Ntatotr, Ntiotate = Ntatotg = Ntotiots = Ntiotote 
Ntgtats = Ntatiots, Ntstgty) = Ntgtiota = Ntiotste = Ntstiot) = Ntiotete 


Netgtsta, Ntiotst3 = Ntgtste = Ntstiot7 = Ntiotst3 = Ntstgt7 = Ntgtiote, Ntiot7ti = 
Ntrtgta = Ntgtioto = Ntiotet: = Ntetvto = Ntrtiota, Ntgtrts = Ntvtiots = Ntiotets = 
Ntgtiots = Ntiot7t3 = Ntrtets}. 

So far we have G = NUNt,NUNtitsNUNhtoNUN{t5t,NUNtit5t7NUNtit5tg NU 
Ntytot, N U NtitotipN U NtitotsN. 

Which gives us 1+ 10+ 30+ 30+5+4 60+ 304+ 10+ 30 + 20 = 226 distinct cosets. 


The orbits of N@5) on {1,2,3,4,5,6, 7,8, 9, 10} are {7,9,8, 10} and {1,2, 4,3, 5,6}. 


We take tz, and t; from the orbits of N@5)), 
We want to determine to which double coset Ntit5t1t7, and Ntitst,t, belong. 


Ntitstit7N is a new double coset which we will denote [1517]. 


for m,n 
r|if> m 


for m,n 
if> m 


for m,n 
r|if> m 


for m,n 
r|if> m 


for m,n 
if> m 


for m,n 
r|if> m 


for m,n 
r|if> m 


for m,n 
if> m 


for m,n 
r|if> m 


for m,n 


r|if> break; 
ia 

r|if> break; 
r|if> break; 
r|if> break; 
Lr 

r|if> break; 
r|if> break; 


r|if> break; 
f in IN do if ts[1] 


r|if> m 


r|if> break; 


in IN do if ts[l 
*(ts[1l]*«ts[1])7n 
end if; end 
in IN do if ts[l 
*(ts[1])*n then " 
end if; end 
in IN do if ts[l 
*(ts[1l]*ts[5])%n 
end if; end 
in IN do if ts[l 
*(ts[l]*ts[2])*n 
end if; end 
in IN do if ts[1l 


x*(ts[l]«ts[5]«ts 
end if; end 
in IN do if ts[l 
*(ts[l]«ts[5]«ts 
end if; end 
in IN do if ts[l 


*(ts[l]«ts[5]«ts 
end if; end 


ir *(ts[l]*«ts[2]*tsf[l 
r|if> break; 

E in IN do if ts[1] 
*(ts[l]*«ts[2]*tsf[l 
r|if> break; 
f in IN do if ts[1] 


end if; end 


end if; end 


«(ts[l]«ts[2]«ts 


end if; end 


J«ts[5]«ts[l]«ts[7] 


then "true"; 

for; 
Jxts[S]*«ts[l]*ts[7] 
Erue™; 

for; 
Jxts[S]*ts[l]*ts[7] 
then "true"; 

for; 


Jets[5]«ts[l]«ts[7] 


then "true"; 
for; 


J«ts[5]«ts[l]«ts[7] 


[1])*n then "true"; 
for; 
Jats[5]«ts[l]«ts[7] 

[7])“n then "true"; 
for; 
J«xts[5]«ts[l]«ts[7] 

[8])*n then "true"; 
fox; 
«ts[5]«ts[l]«ts[7] 
])*n then "true"; 
for; 
*xts[5]*xts[l]x«ts[7] 
0])*n then "true"; 
for; 
«ts[5]«ts[l]«ts[7] 

[5])*nthen "true"; 
for; 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


Four symmetric generators will go to the new double coset [1517]. 


> for m,n in IN do if ts[1 
for|if> m«(ts[l]*«ts[1])*n 

for|if> break; end if; end 
> for m,n in IN do if ts[1l 
for|if> m«(ts[1])*n then " 
for|if> break; end if; end 
> for m,n in IN do if ts[1l 


Jxts[5]*ts[l]«ts 
then "true"; 

for; 
Jxts[5]*ts[l]«ts 
cErue™; 


for; 
Jxts[5]*ts[l]«ts 


[1] 


[1] 


[1] 


eq 


eq 


eq 
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for|if> m«(ts[1l]«ts[5])°n then "true"; 
for|if> break; end if; end for; 
true 
> for m,n in IN do if ts[1l]«*ts[5]*ts[l]«ts[1l] eq 
r|if> m«e(ts[l]*ts[2])7n then "true"; 
if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[1l]*ts[1] eg 
for|if> m«(ts[1l]«ts[5]*ts[1])*n then "true"; 
for|if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[1l]*ts[1] eg 
for|if> m«(ts[1l]«ts[5]*ts[7])*n then "true"; 
for|if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[l]*ts[1] eg 
for|if> m«(ts[1l]«ts[5]«*ts[8])*n then "true"; 
for|if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[l]*ts[1] eg 
for|if> m«(ts[1l]«ts[2]«*«ts[1])*n then "true"; 
for|if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[1l]*ts[1] eg 
for|if> m«(ts[1]«ts[2]*ts[10])°n then "true"; 
for|if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[l]*ts[1] eg 
for|if> m«(ts[1l]«ts[2]«*ts[5])*n then "true"; 
for|if> break; end if; end for; 
for m,n in IN do if ts[l]x«ts[5]xts[1l]*ts[1] eg 
for|if> m*«(ts[1l]*«ts[5]*«ts[l]*ts[7])*n then "true"; 
for|if> break; end if; end for; 


Hh 
(e) 


Hh 
(0) 
Hh WK 


Ntyt5tity € [15]. 


Six symmetric generators go back to [15]. 


The orbits of N@5” on {1,2,3,4,5,6,7,8,9,10} are {1},{5},{7},{9},{2,4},{3,6}, and 
{8,10}. We take t1, ts, t7, tg, t2, t3 and tg from the orbits of N(5"), We want to deter- 
mine to which double coset Nt t5t7t1, Ntitst7ts, Ntitst7t7, Ntytst7t9, Ntitst7te, Ntytst7ts, 
and Ntjtst7tg belong. 


Ntitst7t;N is a new double coset which we will denote [1571]. 


One symmetric generator will go to the new double coset [1571]. 
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Ntitst7tsN is a new double coset which we will denote [1575]. 


One symmetric generator will go to the new double coset [1575]. 


Ntytst7t7 € [15]. 


One symmetric generator goes back to [15]. 


Nttst7tg € [1517]. 


One symmetric generator goes to [1517]. 


Nttst7tg € [12]. 


Two symmetric generators go to [12]. 


Ntitst7t3N is a new double coset which we will denote [1573]. 


Two symmetric generators will go to the new double coset [1573]. 


Nttst7tg € [15]. 


Two symmetric generators go to [15]. 


The orbits of N58) on {1,2,3,4,5,6,7,8,9,10} are {1},{5},{7,9},{8,10}, and {2,3,6,4}. 
We take t1, ts, t7,tg, and ty from the orbits of N@58). We want to determine to which 
double coset Ntytstgt1, Ntitstgts, Ntitstgt7, Ntitstgts, and Nt itstgte belong. 


Ntitstgt;N is a new double coset which we will denote [1581]. 


One symmetric generator will go to the new double coset [1581]. 


NtytstgtsN is a new double coset which we will denote [1585]. 


One symmetric generator will go to the new double coset [1585]. 


Ntyts5tgt7 € [1573] , 


Two symmetric generators go to [1573]. 


Ntyt5tgtg € [15] ? 
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Two symmetric generators go back to [15]. 


Ntytstgtg € [1573]. 


Four symmetric generators go to [1573]. 


The orbits of NO?) on {1,2,3,4,5,6,7,8,9,10} are {10},{1,3,2}, and {4,9,7,6,8,5}. We 
take t19,¢1, and t4 from the orbits of N (121) We want to determine to which double 


cosets Ntytotyt10, Ntytotit,,and Ntytotit, belong. 


NtjtgtitioN is a new double coset which we will denote [12110]. 


One symmetric generator will go to the new double coset [12110]. 


Ntytotit1 € [12]. 


Three symmetric generators go back to [12]. 
Ntytotita € [1575]. 


Six symmetric generators go to [1575]. 


Words of Length 4 


N(517) — fe, (24)(36)(810), (136) (254)(8109), (13) (45) (89), (163) (245) (8910), (16)(25)(910)}. 


The number of the single cosets in the double coset Nt tstit7N is at most wary] = 
120 = 20. 


Ntitstit7N = {Nttstit7 = Ntgtat3t7 = Ntetotet7, Ntgtatgty = Ntotstot7 = Ntiotetiotz, 
Nigtatgtg = Ntotgtots = Ntstitsts, Ntotgtotg = Ntrtatzts = Ntiotitiots, Ntgtotg3ts = 
Ntotrtots = Ntgtitgts, Ntatrtats = Ntgtotets = Ntiotitiots, Ntstitstio = Ntatgtatio = 
Ntetztetio, Ntgt3totio = Ntrtot7tio = Ntgtitstio, Ntotvtota = Ntitgtita = Ntotstota, 
Ntgtgteta = Ntotatiota = Ntstrtsta, Ntitgtite = Ntgtot3ts = Ntrtotrts, Ntstotste 
Ntatgtats = Ntzotetiote, Ntotgteto = Ntitstity = Ntatgtato, Ntrtst7ty = Ntgtetgto = 
Ntiotstioto, Ntitiotitz = Ntgtotets = Ntrtatrts3, Ntotiotets = Ntstotst3 = Ntgtatgts, 
Ntotiotet = Ntgtstot; = Ntatgtat,, Ntgtiot3t; = Ntrtst7t; = Ntgtgtetr, Ntitiotite = 
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Ntotetote = Ntatrtata, Ntztiot3te = Ntgtetgte = Ntstrt5te}. 


N(571) — fe, (24)(36)(810), (19)(24)(310) (68), (19)(38)(610)}. The number of the sin- 


IN] _ = 120 — 39, 


gle cosets in the double coset Nt t5t7t;N is at most [wosTy] = 4 


Ntyt5t7tiN = Ntytst7t) = Ntotst7to, Ntotstito = Ntvtstit7, Ntitstoty = Ntrtstot, 
Ntotgtate = Ntotetgto, Ntotgtoto = Ntgtetotg, Ntotetote = Ntgtgtotg, Ntgtotsts = 
Ntototste, Ntgtot3te = Ntstot3ts, Ntg3totgt3 = Ntstotgts, Ntatztiota = Ntotstioto, 
Ntotstato = Ntyotstatio, Ntatgtot, = Ntotstotio, Ntotrtate = Ntstrtats, Ntatrtota = 
Ntstrtats, Ntat7tste = Ntatrtsts, Ntitgtat; = Ntgtgtate, Ntatgtita = Nteotgtite, 
Ntatgteta = Ntytgteti, Ntztotiot7 = Ntetotiote, Ntiotot7tio = Ntetat7te, Ntztotet7 = 
Ntiotatetio, Ntgtitiots = Ntstitgts, Ntiotitgtio = Ntstitgts, Ntiotitstio = Ntgtitsts, 
Ntytiotet, = Ntgtiotets, Ntatiotite = Ntstiotits, Ntotiotste = Ntitiot3t1, Ntgtatgt3 = 
Ntrtatgt7, Nigtatstg = Ntrtatsty, Ntstat7ts = Ntgtatrts}. 


N(575) — fe, (24)(36) (810), (294) (376) (5810), (49)(58)(67), (29)(37)(510), (249) (367) (5108) }. 


The number of the single cosets in the double coset. Nt tst7ts.N is at most was = 
1 = 20. 


The distinct single cosets in Ntytst7t5N = {Ntytst7ts = Ntitgtets = Ntitiotstio, Ntitstots = 
Ntitgtats = Ntitiotetio, Ntotetsts = Ntat7tst7 = Ntetiotstio, Ntatetots = Ntatvtat7 = 
Ntgtiotitio, Ntgtotst9 = Nt3tatgta = Ntgtiotetio, Ntstotgta9 = Nt3tat7ta = Nt3tiotitio, 
Ntatgtetg = Ntat3tiots = Ntatrtst7, Ntatgtot3 = Ntatrtot7 = Ntatgtitg, Ntstrtat7 = 
Ntstitioti = Ntstoteto, Ntstotst9 = Ntstitgt, = Ntstztot7, Ntetstitg = Nitgtat7te = 
Ntgtotz3to9, Ntgtotstg = Ntgtotiote = Ntetgtatg, Ntztatgta = Nt7tgtiote = Ntztstots, 
Ntrtstits = Ntrtotete = Ntrtytsta, Ntgtetots = Ntgtitiot, = Ntstatrts, Ntgtatsta 


Ntgtitst, = Ntgtetote, Ntotst7ts = Ntotgtiot3 = Ntotetste, Ntotetets = Ntot3tat3 = 
Ntotstits, Ntiot3tots = Ntiotet7t2 = Ntiotitgt, Ntiotetgte = Ntiotitst: = Ntiot3tats}. 


N(@573) — fe, (13)(45)(89)}. The number of the single cosets in the double coset 


Ntitst7t3N is at most was] = 0 = 60. 
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Ntytstrt3N = {Ntytstrtz = Ntgtatrt, Ntstitiota = Ntatgtiots, Ntitgtets = Ntgtotetr, 
Ntgtytioto = Ntgt3tiots, Ntstotgta = Ntatgtets, Nigtatrty = Ntotst7tg, Ntotetgts = 
Ntstitgt2, Ntgtot7t; = Ntytstrte, Ntstotst2 = Ntotiotsts, Ntiotet7ty = Ntotstrtro, 
Ntgtotgt, = Ntytiot3te, Ntiotitgta = Ntotgtgtio, Ntgtotste = Ntgtrtst3, Ntrtotiote = 
Ntgtgtiot7, Ntgtatgte = Ntgtetgt3, Ntatgtiots = Ntetatiota, Ntotetgty = Ntrtatstg, 
Ntatrtste = Ntgtotsta, Ntotrtat, = Ntitgtate, Ntrtotiots = Ntgtitiot7, Ntotetoti = 
Ntytstot2, Ntstitiote = Ntgtetiots, Ntrtstoetg = Nigtetgt7, Ntgtgtats = Ntstrtate, 
Ntytgtato = Ntotstaty, Ntgtotsts = Ntgtitst3, Ntgtgtet; = Ntytioteto, Ntgtotstio = 
Ntiotitste, Ntgtgtots = Ntstiotets, Ntgtgtatio = Ntiotstate, Ntstotet? = Ntrtotets, 
Ntotrtato = Ntotstato, Ntstiotity = Ntrtstits, Ntiotgtats = Ntstrtatio, Ntotiotito = 
Ntgtstit2, Ntstotetio = Ntiototets, Ntatgtite = Ntgtiotita, Ntgtatrtio = Ntiotetrte, 
Ntotetota = Ntatgtote, Ntstat7ts = Ntetat7t3, Ntgtetotio = Ntiotstots, Ntetstits = 
Ntgtiotite, Ntitioteta = Ntatrtoti, Ntiotitgty = Ntrtatgtio, Ntatgtot: = Ntitstota, 
Ntgtatgts = Ntstitgts, Ntiotstoty = Ntytstotio, Ntgtiotets = Ntstrtgt3, Ntatrtoty = 
Ntotetota, Ntgtot3t7 = Ntrtatste, Ntatgtito = Ntotstita, Ntstot3tg = Ntgtatsts, 
Ntrtstits = Ntetgtity, Ntstrtoetg = Nitgtetots, Ntrtatst, = Ntitiot3t7, Ntatrtstio = 
Ntiotitsta, Ntitgtgt7 = Ntrtotet1, Ntotrtstg = Ntgtitsto, Ntioteteta = Ntatgtetio, 
Ntotiotgts = Ntgtat3tz}. 


N(@581) — fe, (26)(34)(79)(810), (14)(35)(710), (163) (245) (8910), (1256)(34)(79810), (15) 
2364) (71098), (164) (235) (7109), (136) (254)(8109), (15) (2463) (78910), (16) (25) (910), (1354) 
26)(78109), (1453)(26) (79108), (146) (253) (7910), (24)(36)(810), (13)(45)(89), (15) (26) (78) 
910), (12)(56)(78), (123)(456) (798), (23) (46) (79), (124) (356) (7810), (142)(365)(7108), (15) 
34) (710) (89), (132)(465) (789), (1652)(34)(71089)}. The number of the single cosets 


in the double coset Nt tstgt;.N is at most [rus] = yw = 5; 


( 
( 
( 
( 


NtytstgtiN = {Ntytstgt; = Ntotetiote = Ntatgt7ta = Ntotet7t2 = Ntgtatiot3 = 

Ntatgtgta = Ntstitots = Ntstityts = Ntitstiot: = Ntgtatots = Ntgtotote = Ntetotete, 
Netgtgtats = Ntytgtiot, = Ntrtotsty7 = Ntitgtst; = Ntotrtiote = Ntrtotaty = Ntgt3tety = 
Ntgt3tst9 = Ntgtotiot3 = Ntotrtgto = Ntgtitetg = Ntgtitatg, Ntstotits = Ntotiot7te = 
Ntgtatetg = Ntotiotete = Ntatgtyts = Ntgtatitg = Ntotst3to = Ntgtstgto = Ntstot7ts = 
Ntatgt3ta = Ntiotot3tio = Ntiotetitio, Ntgtotots = Ntatrtgts = Ntiotitgtio = Ntatrt3ta = 
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Ntytiotgt, = Ntiotitetio = Ntotetstog = Ntotgtst9 = Ntgtotgtes = Ntytiotst, = 
Ntztatst7 = Ntrtatot7, Ntgtgtate = Ntstiotot3 = Ntztstat7 = Ntstiotats = Ntstztots = 
Ntrtstot7 = Ntgtetitg = Ntgtetats = Ntgtgtote = Ntst7tits = Ntiotstitio = Ntiotstetio}. 


N(@585) — fe, (269347)(5108), (24) (36) (810), (29) (37) (510), (274396) (5810), (294) (376) (5810), 
(26)(34)(79)(810), (49) (58) (67), (27)(39)(46)(510), (249) (367) (5108), (23) (46) (79), (23) (47) 


(58)(69)}. The number of the single cosets in the double coset NtitstgtsN is at most 


NtitstgtsN = {Neytstets = Ntitgtiots = Ntitgtstg = Ntitiotstio = Netitstiots = 
Ntytiotgtio, Ntotgt7tg = Ntgtztiot7 = Ntatrtet7 = Ntatiotetio = Ntotgtiots = Ntatiotrtio, 
Ntstotatg = Ntztatiota = Ntztatota = Ntztiototin = Ntztotigta = Ntgtiotatio, Ntatgt3tg = 
Ntatgtrtz = Ntgtatgts = Ntgtrtgty = Ntgtgt7ts = Ntatrtat7, Ntstrtty = Ntstitot, = 
Ntstyt7t, — Ntstotrto — Ntstrtoty — Ntstotito, Ntgtoteto — Ntgtotgts — Ntetotots — 
Ntgetgtots = Ntetotgto = Ntotgtats, Ntztateta = Nt7totste = Ntztatate = Ntytstats = 
Ntrtatsta = Ntrtstots, Nigtetits = Ntgtitat; = Ntgtitet, = Ntgtateta = Ntgtetats = 
Ntgtatita, Ntotstats = Ntgtgtgts = Ntotststz = Ntotgtsts = Ntotstets = Ntotetste, 
Ntiot3tat3 = Ntiotetite = Ntiotet3te = Ntiotit3t, = Ntiotstits = Ntiotatets}. 


N(@2110) — fe, (49) (58) (67), (123) (456) (798), (123) (486957), (23) (46) (79), (13)(45)(89), 
(12)(56)(78), (13) (48) (59) (67), (23)(47) (58) (69), (132)(465)(789), (132)(475968), (12)(49) 


(57)(68)}. The number of the single cosets in the double coset Nt tgtitioN is at most 


NijtotitioN ={Ntytotitio = Ntstitstio = Ntotstotio = Ntatitotio = Ntitstitio = 
Ntgtotatio, Ntotatety = Ntstotstr = Ntgtstaty = Ntgtotatr = Ntotstoty = Ntstatstr, 
Ntatitatg = Ntetatetg = Ntitetitsg = Ntitatits = Ntatetatg = Ntotitets, Ntit7tits = 
Ntotitots = Ntrtotrts = Ntrtytyts = Ntytotyts = Ntotrtots, Ntgtgt3t, = Ntrtatrt, 
Ntgtrtgt, — Ntgtgtgta — Ntgtrtgt, — Ntrtgtrts, Nigtotsts — Ntotgtots — Ntototate 
Ntotgtote = Ntgtotgts = Ntototote, Ntst3tsto = Ntgtstgto = Ntgtetato = Ntgtst3ty = 
Ntstetstg = Ntetsteto, Ntatiotatzs = Ntotatot3 = Ntiototiots3 = Ntiotatiot3 = 
Ntatotats = Ntotiotot3, Ntstiotsti = Ntgtstgti = Ntiotstioti = Ntiotstioti = 
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Ntstgtst; = Ntgtiotst:, Ntgtztgte = Ntiotetiote = Ntvtiot7te = Ntytet7te = 
Ntetiotet2 = Ntiotztiote}. 


So far we have G = NU NtHNUWNttsN U NtitoN U Ntytst,N U Ntytst7N U 
Ntitstg NUNt, tot; NUN totip NUNt tots NUN tytstit7 NUNtytst7ts NUNtytst7ts NU 
Ntitst7t3N U Ntytstgt;N U NtitstgtsN U NtytotitioN. 

Which gives us 1+10+304+30+5+60+30+10+30+20+420+30+20+60+5+10+10 = 
381 distinct cosets. 


The orbits of N@5! on {1,2,3,4,5,6,7,8,9,10} are {7}, {1,3,6}, {2,4,5}, and {8,10,9}. 
We take t7,t,t2, and tg from the orbits of N(@5!”, 


Ntytstit7t7 € [151] , 


One symmetric generator goes back to [151]. 


Ntytstit7t;N is a new double coset which we will denote [15171]. 


Three symmetric generators will go to the new double coset [15171]. 


Ntyts5tyt7te € [125] . 


Three symmetric generators go to [125]. 


Ntytstit7tg € [157] : 


Three symmetric generators go to [157]. 


The orbits of N@5 on {1,2,3,4,5,6,7,8,9,10} are {5}, {7}, {1,9}, {2,4} and {3,6,10,8}. 
We take ts, t7, t1, t2, and ts from the orbits of N@7)), 


Ntytst7tyts € [1210] ; 


One symmetric generator goes back to [1210]. 


Ntytst7tyt7 € [15171] ; 


One symmetric generator goes to [15171]. 
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Ntytst7tity € [157] : 


Two symmetric generators go back to [157]. 


Ntytst7tit2N is a new double coset which we will denote [15712]. 


Two symmetric generators will go to the new double coset [15712]. 


Ntyt5t7tit3 € [1210] : 


Four symmetric generators go back to [1210]. 


The orbits of N@575) on {1,2,3,4,5,6,7,8,9,10} are {1}, {2,4,9}, {3,6,7}, and {5,8,10}. 
We take t1, t2,t3, and ts from the orbits of N(1875) | 


Ntyts5t7tsty € [15712] ‘ 


One symmetric generator goes to [15712]. 


Ntytstrtstg € [121] : 


Three symmetric generators go to [121]. 


Ntytst7tst3 € [1210]. 


Three symmetric generators go to [1210]. 


Ntytstvtsts € [157] : 


Three symmetric generators go to [157]. 


The orbits of N@573) on {1,2,3,4,5,6,7,8,9,10} are {2}, {6}, {7}, {10}, {1,3}, {4,5}, 
and {8,9}. We take ta, te, t7, tio, t1, t4 and tg from the orbits of N (1573) | 


Ntyt5t7tgte € [15712] , 


One symmetric generator goes to [15712]. 


Ntytst7tgt¢ € [1210]. 
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One symmetric generator goes to [1210]. 


Ntytst7t3t7 € [158]. 


One symmetric generator goes to [158]. 


Ntytst7t3ti9 € [125]. 


One symmetric generator goes to [125]. 


Ntytst7tgt, € [157]. 


Two symmetric generators go to [157]. 


Ntitst7t3ta € [15171]. 


Two symmetric generators go to [15171]. 


Ntitst7tztg € [158]. 


Two symmetric generators go to [158]. 


The orbits of N@8) on {1,2,3,4,5,6,7,8,9,10} are {7,9,8,10} and {1,2,4,3,5,6}. We 
take t7 and t, from the orbits of N(@58), 


Ntitstgtit7 € [125]. 


Four symmetric generators go to [125]. 


Ntytstgtity € [158]. 


Six symmetric generators go back to [158]. 


The orbits of N(585) on {1,2,3,4,5,6,7,8,9,10} are {1}, {5,8,10}, and {2,3,7,9,4,6}. We 
take t,t; and tg from the orbits of N (1585) | 


Ntytstgtst;N is a new double coset which we will denote [15851]. 


One symmetric generator will go to the new double coset [15851]. 
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Ntytstgtsts € [158]. 


Three symmetric generators go back to [158]. 


Ntytstgtste € [15171]. 


Six symmetric generators go to [15171]. 


The orbits of N“?!19) on {1,2,3,4,5,6,7,8,9,10} are {10},{1,3,2},and {4,9,7,6,8,5}. We 


take t19,t1, and t4 from the orbits of N(@2!29), 


Ntytotitiotio € [121]. 


One symmetric generator goes back to [121]. 


Ntytotitioti € [15171]. 
Three symmetric generators go to [15171]. 


Ntytotitiota € [15712] Z 


Six symmetric generators go to [15712]. 


Words of Length 5 


N@5171) — fe, (24)(36)(810), (19) (24) (310) (68), (19)(38)(610)}. The number of the 

single cosets in the double coset Ntitstit7t1N is at most rainy — ut = 30. 

Ntitstit7t, = Ntytstit7t) = Ntotstotrto, Ntotstotitg = Ntrtstytitr, Ntitstitot, = 
Ntztst7tot7, Ntatetetgte = Ntotetotgto, Ntotgtoteta = Ntgtetgtots, Ntotetatote = Ntgtgtstots, 
Ntgtotgtst3 = Ntetotetsts, Ntgtotetste = Ntstotststs, Ntstotstets = Ntstotstets, Ntatatatiota = 
Ntotgtotiotg, Ntgtgtotato = Ntyot3tiotatio, Ntatztatota = Ntiotstiototio, Ntot7totate = 
Ntstrtstats, Ntat7tateta = Ntst7tstats, Ntotvtetste = Ntatrtatsta, Ntitgtitaty = 

Ntgtgtetate, Ntatgtatits = Ntgtgtetite, Ntatgtateta = Ntytgtitet,, Ntrtotrtiot7 = 

Ntetotetiote, Ntiotatiot7tio = Ntetotet7te, Ntztot7tet7 = Ntiotatiotetio, Ntgtitstiots = 
Ntstitstiots, Ntiotitiotgtio = Ntstitststs, Ntiotitiotstio = Ntgtitgtsts, Ntitiotiteti 
Ntgztiot3tet3, Ntotiotetite = Ntgtiot3tit3, Ntotigtets3te = Ntitiotit3t1, Nt3tat3tgt3 = 
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Ntrtatrtgt7, Ntgtatgt3tg = Ntztat7t3t7, Ntstatst7t3 = Ntgtatgt7tg}. 


N(5712) — fe, (129)(387) (5106), (29)(37)(510), (19)(38) (610), (192) (378) (5610), (12)(56)(78)}. 


The number of the single cosets in the double coset Nt tst7titoN is at most [rosy = 
10 = 20. 


Ntytstrtito = {Ntytst7t1t2 = Ntotgtgtot, = Ntotstrtote = Ntitiotstito = Ntotiotstots = 
Ntotetgtot, Ntitstrtite = Ntotgtgtot: = Ntotst7tote = Ntitiotstito = Ntotiotstots = 
Ntotetgtot:, Ntiotitgtiots = Ntstotgtstio = Ntstitgtsts = Ntiotetrtiots = Ntgtatrtets = 
Ntetotstetio, Ntotrtsteto = Ntatgtiotate = Ntatrtstato = Ntotetgtots = Ntotgtgtota = 
Ntgt3tiotote, Ntrtotiot7ts = Ntgtotstgty = Ntetotiotets = Ntrtatgtrte = Ntgtatgt3ts = 
Ntgtotst3t7, Ntgtotst3t: = Ntetgtatets = Ntetotstet: = Nt3tiotetsts = Ntitiotetits = 
Ntytgtatit3, Ntgtgtatotg = Ntiotitstiota = Ntiotstatiots = Ntotetototio = Ntgtgtatgtio = 
Ntgtytstgt9, Ntotgtiotot; = Ntatgtetato = Ntatgtiotat; = Ntotstrtota = Ntytstrtita 


Ntitgtetito, Ntztotetg3tg = Ntstitigtst3 = Ntstotetstg = Ntstat7t3t5 = Ntgtatztsts = 
Ntgtitiotgts, Ntotrtatots — Ntstotgtsto — Ntstrtatsts — Ntotiotitets — Ntgtiotitsts — 
NisztotetstaNtrtotet7tog = Ntiotstatiot7 = Ntiotatetioto = Nt7tstitztio = Ntotstitgtio = 
Ntgtz3tatot7, Ntitstotite = Ntrtetiot7ty = Ntrtstot7ts = Ntitgtatit7 = Ntgtstatet7 = 
Ntetotiotet1, Ntstitiotste — Ntgtetotgts — Ntgtitiotgt2 — Ntstrtatstg — Ntotrtatots — 
Ntotgtotots, Ntotgtotots = Ntgtatrtgt = Ntgtgtotats = Ntotiotitots = Ntgtiotitsts = 
Ntsztatr7t3te, Ntgtat7tets = Ntiotstotiote = Ntiotetrtiota = Ntotgtitetio = Ntatgtitatio = 
Ntatstgtate, Ntatgtitats = Ntgtotsteta = Ntetgtitets = Ntatztotate = Ntstrtotste 
Ntstotatsta, Ntrtatgtrty = Ntgtetotgtr = Ntgtatstgto = Ntrtstitrts = Ntotstytots 


Ntotetotot7, Ntgtatgt3t, = Ntztstot7t3 = Ntrtatgt7t; = Nt3tiotetst7 = Ntitiotetit7 = 
Ntytstotit3, Ntatgtotats = Ntiotitgtiota = Ntiotstotiots = Ntatrtotatio = Ntstrtotstro 
Ntstitgtsta, Ntitgtetite = Ntatrtstat, = Ntatgtgtate = Ntitiotstita = Ntotiotstota = 
Ntotrtstot1, Ntgtitstst7 = Ntiototetiots = Ntiotitstioty = Ntgtatststio = Ntrtatst7tio = 
Ntrtotetrts}. 


NG@5851) — {e}. The number of the single cosets in the double coset Ntyt5tgtst;N is 


N| =, 10 ey 


at most [NUsS5DT = fb 
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Ntytstgtst; = {Ntitstgtst, = Ntgtotatot3 = Ntatgt7tgt, = Ntytgtiotgt; = Ntstotitots = 
Ntotet7tetg = Ntrtotstot7 = Ntetiot7tiote = Ntstatiotats = Ntgtgtotote = Ntotet3tgto = 
Ntgtgtgtgt, = Ntytgtstgty = Ntgtatgtats = Ntstitotits = Ntat7tgt7t, = Ntyitiotstiot; = 


Ntstitrtits = Ntotrtiot7tg = Ntgtgtitets = Ntotgtststo = Ntgtgtotgts = Ntitstiotst 
Ntrtotatoty = Ntotiotetiote = Ntgtatotatz = Ntyotitstitio = Ntgtototots = Ntgtatetatg 
Ntrtstatst7 = Ntotrtgtrt, = Ntstiototiots = Ntetotgtots = Ntatgtrtgta = Ntiotgtotstio = 
Ntatgtgtgta = Ntotstgtsto = Ntgtiotatiots = Ntgtatitatg = Ntgtotiotots = Ntatrtstrta = 
Ntytiotgtiot: = Ntgtitetits = Ntgtst3tsto = Ntstgt7tots = Ntstrtot7ts = Ntgtitatits = 
Ntrtatstaty = Ntiotgtitotio = Ntetotgtote = Ntstrtit7ts = Ntiotitetitio = Ntrtstotst7 = 
Ntiotatstetio = Ntotetsteto = Ntgtgtotgts = Ntgtetatets = Ntiotgtit3tio = Ntrtatetaty = 
Ntotetiotete}. 


So now we have the following double cosets, G = NU NtiN U NtytsN U NtyteN U 
NtytstiN UNtytst7N U NtytstgN UNtytoti NU NtytotigN U NtytotsN U Ntytstit7N U 
Ntytst7tsN U Ntytst7t5N U Ntytst7t3N U Ntytstgt,N U Ntytstgts N U NtytatitioN U 
Ntytstit7t; N U NtytstrtitoN U Ntytstgtst, N. 

Which gives us 1 + 10 + 30+ 30+5 + 60+ 30+ 10 + 30 + 20 + 20+ 30 + 20+ 60 + 
5+ 10+ 10+ 30+ 20+ 1 = 432 distinct cosets. 


We have now found all of our distinct cosets. Thus, there will be no more new double 


cosets. To show this we can continue in the same manner as above. 


The orbits of N@5!7) on {1,2,3,4,5,6,7,8,9,10} are {5}, {7}, {1,9}, {2,4}, and {3,6,10,8}. 
We take ts,t7,t1,t2, and t3 from the orbits of N(@5!7)), 


Ntytstit7tts € [12110] 4 


One symmetric generator will go to [12110] . 


Ntyts5tyt7tit7 € [1571]. 


One symmetric generator will go to [1571]. 


Ntyts5tyt7tity € [1517]. 
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Two symmetric generators will go to [1517]. 


Ntyt5tyt7tite € [1585]. 


Two symmetric generators will go to [1585]. 


Ntytstit7tt3 € bkeweete 


Four symmetric generators will go to [1573]. 


The orbits of N“57!?) on {1,2,3,4,5,6,7,8,9,10} are {4}, {1,9,2}, {3,7,8}, and {5,6,10}. 
We take t4,t1,t3, and ts from the orbits of N(57!?), 


Ntitstr7ti tata € [1575]. 


One symmetric generator will go to [1575]. 


Ntitst7ti tet, € [1571]. 


Three symmetric generators will go to [1571]. 


Ntitst7titat3 € [1573]. 


Three symmetric generators will go to [1573]. 


Ntitst7titats € [12110] 


Three symmetric generators will go to [12110]. 


The orbits of N“@5%5) on {1,2,3,4,5,6,7,8,9,10} are {1,3,4,5,2,7,6,9,8,10}. We take ty 
from the orbit of N(4585), 


Ntytstgtstity € [1585]. 


Ten symmetric generators will go to [1585]. 


Below is our completed Cayley Diagram. 
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QHl0 695 


Figure 5.5: ($(4,3) : 2) Over 
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Chapter 6 


Transitive Groups 


In this chapter we will examine several groups that are transitive on n letters 


by using NumberOfTransitiveGroups(n) command in MAGMA. 


6.1 ‘Transitive Groups on 20 Letters 


Using the following code we find that there are 1117 transitive groups on 20 
letters. 


> NumberOfTransitiveGroups (20); 
1117 


We will examine some of these groups and write progenitors. 


6.1.1 Transitive Group(20,222) 


Let N be transitive group 222 on 20 letters. N is of order 1920 and is 
generated by xx = (1, 16,9, 2, 15, 10)(3, 18, 11)(4, 17, 12)(5, 6)(7, 14, 19)(8, 13, 20) and 
yy = (1,14, 15,2, 13, 16)(3, 19, 6, 8, 18, 10, 4, 20, 5, 7, 17,9). 


> N:=TransitiveGroup (20,222); 

> #N; 

1920 

> Generators (N); 

i 

(26 UG, Op 2k USy LOS, 187 Thy Ay TAS: 26) 
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Next we find a presentation for N 


> FPGroup (N); 
Finitely presented group on 2 generators 
Relations 
$.1°6 = Id($) 
S.1 * $.2°-1)7*4 = Id(S$) 
* S,1 * $.2*-1 * $.1°-2 « $.2°-1 * $1.1 * $1.2 * $.1°-1 = Id($) 
“-1 * S.1°-1 * $.2 * $.1°-1 * $.2°-1 * $.1 * $.2°3 * $.1 = Id($) 
S$.1°-1 *« $.2°2 x $.1°-1 * $.2°-1)°2 = Id(S$) 


( 
Pad 
$.2 
( 


Thus we have the following presentation of N for the progenitor 2*7° : (24 : Ss). 
(Proof of Isomorphism of N to follow.) 


N =< 2, y|2°, (xy’)*, yoy’o*yPays?, yx? ys?y cys, (2°y?aPy?)? >. 
Next we will add t. Let t ~ t;. Since our t’s are of order 2, we add ?t? to the 
presentation. Now we need to look at the stabiliser of 1 that commute with t. We 
label N1 as the stabiliser of 1 in N and find the generators of N1. 
> N1l:=Stabiliser(N,1); 


> Generators (Nl); 


{ 


3, 14) (15, 16) (17, 18) (19, 20), 


3 

37 Oe 4p OP CT, 95. 8) 10).(0L3,. 16, Ta, 15) (19%. 20) 
1 

3, 8, 4, 7) (5, 10, 6, 9) (15, 16) (17, 20, 18, 19) 


} 


We then use our Schreier System to translate these permutations into words. 


> Sch:=SchreierSystem (NN, sub<NN|Id (NN) >); 

> ArrayP:=[Id(N): 1 in [1..1920]]; 

> for iin [2..1920] do 

for> P:=[Id(N): 1 in [1..#Sch[i]]]; 

for> for j in [1..#Sch[i]] do 

for|for> if Eltseq(Sch[ 

for|for> if Eltseq(Sch[i 
tseq(Sch[ 


) ]:=xx; end if; 
)[j3] eq 2 then P[j]:=yy; end if; 
) J] :=xx*-1; end if; 


- m7 
G 


for|for> if 


, t, 14) (4, 8, 13) (5, 10, 16) (6, 9, 15) (11, 19, 18) (12, 20, 17), 
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for|for> if Eltseq(Sch[i])[j] eq -2 then P[j]:=yy*-1; end if; 
for|for> end for; 

for> PP:=Id(N); 

for> for k in [1..#P] do 

for|for> PP:=PP*P[k]; end for; 

for> ArrayP[1]:=PP; 

for> end for; 

> for i in [1..1920] do if ArrayP[i] eq N!(3, 7, 14) (4, 8, 13) 


for|if> (5, 10, 16) (6, 9, 15) (11, 19, 18) (12, 20, 17) then Sch[i 
for|if> end if; end for; 

y*« X°2 * y°-2 * x*-1l * y * x°-l 

> for iin [1..1920] do if ArrayP[i] eq N!(3, 5, 4, 6) (7, 9, 8, 10) 
for|if> (13, 16, 14, 15) (19, 20) then Sch[i]; end if; end for; 

x°-1l * y°-l * x*°-1l * y°-3 * x * y-l 

> for iin [1..1920] do if ArrayP[i] eq N! (13, 14) (15, 16) (17, 18) 
for|if> (19, 20) then Sch[i]; end if; end for; 

(y * x * y°-1)°3 

> for iin [1..1920] do if ArrayP[i] eq N!(3, 8, 4, 7) (5, 10, 6, 9) 
for|if> (15, 16) (17, 20, 18, 19) then Sch[i]; end if; end for; 


Ryd! hae SEs eye AZ 


Therefore we have the following presentation, 


is aK aye ap) gaye per yee parler e |) 


fig yer yn) Gerry ry), ory) Grey > 


Now we add first and second relations to our progenitor in order to find homomorphic 
images of 2*70 ; (24 : Ss). 

G =< 2,y,t\2, (vy®)4, yryPatyaye?, Par yoryaryee, (2 y2a>y>)?, 

ee eg ), (6, 2% ya? yray?), (t, (yxy®)?), (t, yay"), 
(ayt)"! es YY, (wytleve 73, (aye), ((ay)e@*ev) ev) yr5, 
(Cay) Me )7S, (ay), (ary) ME), (ayPate V9, 
(cyxtt(? a (x3 tt ry *x)yr11 (xyxy tery) )ri2 ee 


Table 6.1: 2*2° : (24 : Ss) 


283 


rl r2 r3 r4 r5 r6 r7 r8 r9 rlO rll r12 OrderofG ShapeofG 

6 6 4 8 0 0 0 0 O 0 0 0 103680 2°(S(4, 3) : 2) 
0 0 0 0 2 3 0 0 #0 0 0 0 744000 [3(5) : 2 

0 0 0 0 2 4 5 9 O 0 0 0 979200 S(4, 4) 

0 0 0 0 0 0 0 0 38 4 0 0 190080 Mj: 2 

0 0 0 0 0 0 0 0. 0 0 2 8 380160 (My x 2): 2 


Proof of the Isomorphism for the Shape of N 


The composition series of N is given below. 


Cyel 


Cycl 


Cyel 


Cycl 


Cyclic (2) 


Alternating (5) 


ic(2) 


Le-(2) 


Le (2) 


ee .C2) 


G = G, D Go D G3 DD G4 D Gs D 1, where G = (G/G1)(Gi/G2)(G2/G3)(G3/G4) 


(G'4/G5)(G5/1) = Cy A5C2C2C2Co. 


The Normal Lattice of N is 
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[1] 


[2] 


Order 16 


[3] 


Order 960 


[4] 


Order 1920 


We use the following loop to give us the largest abelian subgroup of N. 


> NL:=NormalLattice (N); 

> for iin [1..4] do if IsAbelian(NL[i]) then i;end if;end for; 
1 

2 

NL{2], our largest abelian subgroup of N is of order 16. We will examine possibilities 


of groups of order 16 to find the isomorphism type of NL[2]. 


> X:=AbelianGroup (GrpPerm, [2,2,2,2]); 

> s:=IsIsomorphic(X,NL[2]);s; 

true 

We have verified that NL[2] = 2*. Since 1920/16=120, and we do not have a normal 
subgroup of order 120, we will have a semi-direct product. We will factor by NL[2] 


and check the isomorphism type of qg, our factor group. 


> g,ff£:=quo<N|NL[2]>; 
> s:=IsIsomorphic(q,Sym(5));s; 
true 


So we will have a semi-direct product 2+ : 55. We need to write a presentation of 2+. 
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A =< Ww, x, Y; z|w?, 27, y", Zz, (w, x), (w, Y), (w, 2) (a, Y), (x, 2), (y, Zz) >. 


A presentation for Ss is Q =< a, bla®, b?, (a~'b)*, (aba~*ba)? >. We find an element 


of order 5 and an element of order 2, F and G, respectively. 


for 1 in NL[4] do if i notin NL[2] and Order(i) eq 5 and sub<N|i,NI 
eq N then F:=1; break; end if; end for; 
for 1 in NL[4] do if i notin NL[2] and Order(i) eq 2 and sub<N|i,NI 
eq N then G:=1; break; end if; end for; 


Now we need to find the action of F and G on the generators of NL[2]. 


> for iin [1..#N1] do if ArrayP[i] eq A°F then print Sch[i]; 
for|if> end if; end for; 

vA 
> for iin [1..#N1] do if ArrayP[i] eq B°F then print Sch[i]; 
for|if> end if; end for; 

w* X * Y * Z 
> for iin [1..#N1] do if ArrayP[i] eq C°F then print Sch[i]; 
for|if> end if; end for; 


Ww 
> for iin [1..#N1] do if ArrayP[i] eq D°F then print Sch[i]; 
for|if> end if; end for; 
x 
> for iin [1..#N1] do if ArrayP[i] eq A*°G then print Sch[i]; 
for|if> end if; end for; 


Ww 
> for iin [1..#N1] do if ArrayP[i] eq B°G then print Sch[i]; 
for|if> end if; end for; 


Z 
> for iin [1..#N1] do if ArrayP[i] eq C°G then print Sch[i]; 
for|if> end if; end for; 


> for iin [1..#N1] do if ArrayP[i] eq D°G then print Sch[i]; 
for|if> end if; end for; 


Finally we will add the presentation of Q, along with the action of a and b on the 
generators of H = 24, to our presentation of H. 


G= W,2,Y,2,a, blw?, a; y?, z, (w, x), (w, y), (w, z), (x, Y); (x, z), (y, z), a”, b?, (a~1b)4, 
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(aba~2ba)*, w* = z, 2° = wayz,y? = w, 27 =2,w =u,2° =2z,y =y,2=2>. 


We then verify the isomorphism. 


G<w,X,Y,Z,a,b>:=Group<w,x,y,Z,a,b|w°2,x°2,y°2,2°2, (W,X), (W,Y), 
(w,Z), (X,Y), (X,Z), (y,Z), 

a~5,b°2, (a°-1*b) “4, (axbxa*-2xbxa) “2, 

W° a=Z,X° A=WkX*Y*Z,Y a=W, Z° a=xX, 

w°b=w, X°b=z,y° b=y, Z° b=x>; 

£1,G1,k1:=CosetAction(G, sub<G|Id(G)>); 
s,t:=IsIsomorphic(G1,N); 

S; 
rue 


tTVV VV VV VOY 


Thus N & (24: 95). 


6.1.2 Transitive Group(20,102) 


Let N be transitive group 102 on 20 letters. N = (5? :* 4?) is of order 400 
and is generated by x = (1,6, 15,16, 2,9, 12, 17,3, 7, 14, 18, 4,10, 11, 19, 5, 8, 13, 20), 
y = (1,8, 12,17, 4, 10, 11, 18, 2,7, 15, 19, 5,9, 14, 20, 3, 6, 13, 16), and z = (1,7, 15, 16) 
(2,8, 13, 19)(3, 9, 11, 17)(4, 10, 14, 20)(5,6, 12,18). In the same manner as before, we 
find the following presentation for G. 


Died d S12). 1 


Geagzde ly (ts ys) ees eee ee ae ly ee yet, 


t, (t, yy”), (t,(y1,277)), 
(tls ety Gi rey >, 


Table.2- 290 4:(52 a) 
rl r2 r3 r4 Order of G Shape of G 
3. 9 9 9 2448 L(17) 
3 0 0 7 672 4 x [2(7) 
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Proof of the Isomorphism for the Shape of NV 


The composition series of N is given below. 


Cyclic (2) 
Cyclic (2) 
Cyclic (2) 
Cyclic (2) 


Cyclic(5) 


Cyclic(5) 


G = GD Go D G3 DD G4 D Gs D 1, where G = (G/G1)(Gi/G2)(G2/G3)(G3/G4) 
(Gi) GE) Gs/1) = CoCo Ca CaCsCe. 


The Normal Lattice of N is 


[1] 


(ae a 


ey 20 ae 50 be jer 5 Order 50 Order 20 


i) Ge [12] é a 


Order 100 ‘i I Order 100 di 100  Order100 Order 100 Order 100 


ee h 
ec lee 200 Order 200 


da 


Order 400 


By looking at the normal lattice we see that we will not have a direct extension since 


we do not have 2 normal subroups of N whose product will give us |N| = 400. We 
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then find the largest abelian subgroup of N. 


> for iin [1..22] do if IsAbelian(NL[i]) then i;end if;end for; 


> NL[6]; 

Permutation group acting on a set of cardinality 20 
Order = 25 = 5°2 
(ly 25 By 4 SB )COys why. “Sap Sip LOC Ley, 22:0). -19;,. “h83. 1h) 

(6, 9, Vy 10, SY -Gl Ip» 14, 12; 155 13)(he; 19; 17, 20, 18) 
> X:=AbelianGroup (GrpPerm, [5,5]); 
> s:=IsIsomorphic(X,NL[6]);s; 
true 


NL[6]& 5? is an abelian subgroup of N. Therefore we will have a mixed extension 
N = 52 :* Q. Now we will factor by NL[6] and form a factor group, g. We then check 
the normal lattice of q to find the isomorphism type of Q. 


gq, ££:=quo<N|NL[6]>; 


Now, Q is of order 16. We check isomorphism of Q. 


> s:=IsIsomorphic(q,CyclicGroup (16) );s; 

false 

> s:=IsIsomorphic (q, DirectProduct (CyclicGroup (8) ,CyclicGroup (2)));s; 
false 

> s:=IsIsomorphic(q,DirectProduct (CyclicGroup (4) ,CyclicGroup (4)));s; 


true 


Q = 4?. So we should have a mixed exension 5? :* (42). To prove this isomorphism 


we need a presentation for Q = 4?. 


> Q<a,b>:=Group<a,b|a~4,b°4, (a,b) >; 

> £1,Q1,k1:=CosetAction(Q,sub<Q|/Id(Q)>); 
> s,t:=IsIsomorphic(Q1,q); Ss; 

true 
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Now we need to write the generators of Q into elements of gq. We will need to look at 


the transversals of NL[6]. 


> T:=Transversal(N,NL[6]); 


> #7; 

16 

> A:=t(fl(a)); 

> B:=t(fl1(b)); 

> for iin [1..#T] 
2 

> for iin [1..#T] 
3 


Now we store T/2] and T[3] as A and B, respectively. 


> T[2]; 

(Dy 6: Lop 16 2, 
20) 

> A:=N! (1, 6, 15, 
SB: 113; -2:0):3 

> PLS ly 

(1, 8, 12, 17, 4, 
16) 

> B:=N! (1, 8, 12, 
> Cz 13 Lo)? 


9, 


16, 


0, 


ia 


sig 


eq B 


then i; 


then i; 


end if; end for; 
end if; end for; 
LO Wy FOS. By ASy 
Bey Ag: DOG ade, «Oy. by 
9, 14, 207 3) 6, 23; 
LO. by Oy LA, 204 3; 


Next we find generators of NL[6] and store them. Recall that NL[6] = 5”, so we will 


need two generators of order 5. 


> 
5 
> Order (NL[6].2); 
5 
> 
> 


D:=NL[6].1; 
] L[6].2 


y 


Now we look at our presentation for @ to see if anything has changed once we apply 


the action of q. 


> Order (A); 
20 
> Order (B); 
20 
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Recall that our presentation for Q was < a, bla’, b*, (a,b) >, thus the order of a and 
the order of b have been changed by the action of g. We will need to write these 


generators in terms of D and E. 


> for i,j in [0..5] do if A°4 eq D°ixE*3 

for|if> then i,j; break; end if; end for; 
1 4 
> for i,j in [0..5] do if B°4 eq D°i*E*3 

for|if> then i,j; break; end if; end for; 
32-3 
> for i,j in [0..5] do if (A,B) eq D°“ixE’j 
for|if> then i,j; break; end if; end for; 

10 
> for n,o- in [O..55:]) -do 

for> for p,q in [0..20] do 

for|for> if D°A eq D°n*E*ox*xA*pxB’g 

for|for|if> then n,o,p,q; break; end if; end for; end for; 
0012 8 

> £or moO aun [On 25] - do 

for> for p,q in [0..20] do 

for|for> if D°B eq D°n*E*ox*xA*pxB’q 

for|for|if> then n,o,p,q; break; end if; end for; end for; 
0 0 16 4 

> fOr -n; oO: hy [O..S)] do 

for> for p,q in [0..20] do 

for|for> if E°A eq D°n*E*ox*xA*pxB’g 


for|for|if> then n,o,p,q; break; end if; end for; end for; 
008 8 

> For m;,.0. an. [20.457] do 

for> for p,q in [0..20] do 

for|for> if E°B eq D°n*E*ox*xA*pxB’g 


for|for|if> then n,o,p,q; break; end if; end for; end for; 
0044 


The above loop tell us that a+ = de*, b+ = d?e?, (a,b) = d,d* = a!#b8, d? = a!®b4, e% = 


a®b®, and e? = a*b*. We can now add these relations to our presentation of Q, along 


with the 2 generators of NL[6], say d and e, to check our isomorphism of N. 


> NN<a,b,d,e>:=Group<a,b,d,e|a* 4=d*e"4,b* 4=d* 3xe*3, (a,b) =d,d*5,e75, 
> d°a=a712«*b*8,d°b=a°16*b*4,e° a=a* 8xb*8,e°b=a"4xb*4>; 
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> £2,NN1,k2:=CosetAction (NN, Sub<NN|Id(NN) >); 
> s:=IsIsomorphic(N,NN1);s; 


true 


Thus NV & 52 :* (4?) 


6.1.3 Transitive Group(20,121) 


Let N be transitive group 102 on 20 letters. N = ((5 : 4) x $4) is of order 480 
and is generated by x = (1,4, 2,3)(5, 12, 18, 15)(6, 11, 17, 16)(7, 9, 20, 14)(8, 10, 19, 13) 
and y = (1,8,9,16,17,4,5, 12, 13, 20)(2, 6, 10, 14, 18)(3,7,11,15,19). In the same 
manner as before, we find the following presentation for G. 


Cale eer rue one ae ee ee 


ete i ey my eet 

#, (t, ya" y?), (t, yeye"y), 

yxy Lyla Ly 2¢)rl (yx2yta- Ly !x?¢2")r2, (y-ta —ly-L ype? yr3 
-ly-1 y~ tat)" (x71 y tal ya2y y)r5 (xyxty-lx —lyey" "6, 


2 
Lyx ly -1 rime 118 Was eee at \F* ,(y? CT Tae ty. (yar hya2t?” ae 
( 


Bion 
ryry st! ‘eras (a? yay?t¥ ae (y Bite. (x y)2t¥ “ris ((ay)2t¥)"!, ((ay)-e)"? >, 


( 
(y 
( 
( 


Table 6.3: 2*7° : ((5: 4) x S4) 


rl r2 r3 r4 r5 v6 r7 r8 r9 rl10 rll r12 rl13 114 115 rl6 Order G 

0 7 7 7 7 0 0 0 0 0 0 0 0 0 0 0 58240 2°Sz(8) 

0 7 8 8 8 0 0 0 0 0 0 0 0 0 0 0 161280  2°(2: L3(4)) 

6 0 6 0 7 0 0 0 0 0 0 0 0 0 0 0 48720 PGL(2, 29) x 2 
6 0 6 8 6 0 0 0 0 0 0 0 0 0 0 0 1344 PGL(2,7) x (2 x 2) 
6 0 6 0 6 0 0 0 0 0 0 0 0 0 0 0 4032 PGL(2,7) x Dig 
0 0 0 0 0 5 5 0 0 0 0 0 0 0 0 0 7920 6° : PGL(2, 11) 

0 0 0 0 0 0 0 0 0 +0 0 0 2 0 7 0 8736 PGL(2,13) x 4 

0 0 0 0 0 0 0 0 0 +0 0 0 6 2 8 0 1520640 2% Mjg*2*2*2 
0 0 0 0 0 0 0 0 0 +0 0 2 0 0 7 6 4368 2° PGL(2, 13) 

0 0 0 0 0 0 0 0 0 +0 0 7 0 2 7 7 116480 = (2°S'z(8)) x 2 

0 0 0 0 0 0 0 0 0 +0 7 6 10 0 8 6 235200 2: L9(49) 


Proof of the Isomorphism for the Shape of N 


The composition series of N is given below. 


G 

Cyclic (2) 
* 

Cyclic (2) 
* 

Cyclic(5) 
* 

Cyclic (2) 
* 

Cyclic (3) 
* 

Cyclic (2) 
* 

Cyclic (2) 


G = G, D Go D G3 DD G4 D Gs D Gg D 1, where 
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G = (G/G1)(Gi/G2)(G2/G3)(G3/Ga4)(G4/G5)(Gs5/G6)(G6/1) = C2C2C5C2C3C2C2. 


The Normal Lattice of N is 


1] 
aN 
[2] [3] 


Order 5 Order 4 


a i. 


[4] [6] [5] 


Order 10 Order 20 Order 12 


ae ae ae 


[7] [9] [10] [8] 
Order 20 Order 40 Order 60 Order 24 


SFR FNS 


[11] [13] [12] [14] 
Order 80 Order 120 Order 120 Order 120 


SIN 


[17] [15] [16] 
Order 240 Order 240 Order 240 


18 
Order 480 
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We see that NL[7] is of order 20 and NL[8] is of order 24. Since 20-24 = 480, and 


both subgroups are normal in N, then we have a direct product. 


> s:=IsIsomorphic(N,DirectProduct (NL[7],NL[8]));s; 
true 


Now we will need to find the isomorphism of NL[7] and NL[8}. 


> NL[7]; 

Permutation group acting on a set of cardinality 20 

Order = 20 = 2°2 x 5 
(Sy 9% Dp -F3)C6, -10,. 18, P47, EE, D9, 259-68, 22, 20, 16.) 
(5, 17) (6, 18) (7, 19) (8, 20) (9, 13) (10, 14) (11, 15) (12, 16) 
(1, 9, 17, 5, 13) (2, 10, 18, 6, 14) (3, 11, 19, 7, 15) (4, 12, 

20, 8, 16) 

> FPGroup(NL[7]); 

Finitely presented group on 3 generators 


Relations 
$.1°4 = Id($) 
$,2°2 = Id(S$) 
Sed 2 eS. . = Id(S$) 
($.2 * $.37 “2 = Id(S$) 


S.1 * $.3°-1 * $.1°-1 * $.3°-2 = Id(S) 
G<x,y,zZ>:=Group<x,y,Z|xk°4,y°2,x° -2x*y, (y*z°-1)°2,x*zZ°-1*x°-1*z7-2>; 
f1,G1,k1:=CosetAction(G, sub<G|Id(G)>); 
s,t:=IsIsomorphic(G1l,NL[7]); s; 
nnl:=NormalLattice (G1); 
nnl; 

Normal subgroup lattice 


VVV VV 


4] Order 20 Length 1 Maximal Subgroups: 3 
(si Order 10 Length 1 Maximal Subgroups: 2 
ie Order 5 Length 1 Maximal Subgroups: 1 
an Order 1 Length 1 Maximal Subgroups: 


> Center (G1); 
Permutation group acting on a set of cardinality 20 
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for iin [1..4] do if IsAbelian(nnl[i]) then i;end if;end for; 


> 

1 

2 

> s:=IsIsomorphic(nnl1[2],CyclicGroup(5));s; 
> H<x>:=Group<x|x*5>; 
> 

> 

ic 

> 


f1,H1,k1:=CosetAction (H, sub<H|Id(H)>); 
s,t:=IsIsomorphic(H1,nnl[2]); s; 

rue 

for i in nnl[4] do if i notin nnl[2] and Order(i) eq 4 and 
for|if> sub<Gl|i,nnl[4]> eq Gl then F:=i; 

for|if> break; end if; end for; 

> A:=t (f1(x)); 


> Nl:=sub<nnl [4] |A>; 

> NN<x>:=Group<x|x75>; 

> Sch:=SchreierSystem (NN, sub<NN|Id(NN)>); 

> ArrayP:=[Id(N1): i in [1..#N1]]; 

> Sch:=SchreierSystem (NN, sub<NN|Id(NN)>); 

> for i in[2..#N1] do 

for> P:=[Id(N1): I in [1..#Sch[i]]]; 

for> for j in [1..#Sch[i]] do 

for|for> if Eltseq(Sch[1i])[j] eq 1 then P[j]:=A; end if; 
for|for> if Eltseq(Sch[i]) [Jj] eq -1 then P[j]:=A*-1; end if; 
for|for> end for; 

for> PP:=Id(N1); 


for> for k in [1..#P] do 

for|for> PP:=PP*P[k]; end for; 

for> ArrayP[1]:=PP; 

for> end for; 

> for iin [1..#N1] do if ArrayP[i] eq A°F then print Sch[i]; 
for|if> end if; end for; 

x72 

> H<x, y>:=Group<x,y|x°5,y°4,x° y=x°2>; 

> f1,H1,k1:=CosetAction(H, sub<H|Id(H) >); 
> s,t:=IsIsomorphic(H1,NL[7]); s; 

true 


Thus NL[7] = (5:4). 


> NL[8]; 
Permutation group acting on a set of cardinality 20 
Order = 24 = 2°3 x* 3 
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(3, 4) (7, 8) (11, 12) (15, 16) (19, 20) 

(2, 4, 3) (6, 8, 7) (10, 12, 11) (14, 16, 15) (18, 20, 19) 

(1, 2) (3, 4) (5, 6) (7, 8) (9, 10) (11, 12) (13, 14) (15, 16) (17, 
18) (19, 20) 
(1, 4) (2, 3) (5, 8) (6, 7) (9, 12) (10, 11) (13, 16) (14, 15) (17, 
Z20)C18; . 19) 
> s:=IsIsomorphic(NL[8],Sym(4));s; 
true 


Hence NL[8] = Sa. 


Now we add both presentations together and verify the isomorphism of N. 


> FPGroup(NL[7]); 
Finitely presented group on 3 generators 


Relations 
$.1°4 = Id(S$) 
S202) = TAS) 
$.1°-2 * $.2 = Id(S) 
($.2 * $.3°7-1)72 = Id(S$) 
S.1 * $.37-1 * $.1°-1 * $.3°-2 = Id(S$) 


> FPGroup(NL[8]); 
Finitely presented group on 4 generators 


Relations 
S21 2= Tas) 
$.2°3 = Id(S) 
oa3°2: = Tas) 
$.4°2 = Id(S$) 
($.2°-1 * $.1)°2 = Id(S$) 
$.27°-1 *« $.3 * $.2 *« $.4 = Id(S$) 
(Sil! He S42 = Tas) 
($.3 * $.4)°*2 = Id(S$) 


$.2 * $.3 * $.2°-1 *« $.3 *« $.4 = Id(S) 

> H<u,v,W,X,VY,Z,r>:=Group<u,v,w,x,Vy,Z,rlu-4,v2,u°-—-2«v, (v*xw~-1)°2, 
> uxwo-leu°-lew?-2,x°2,y°3,2°2,r°2, (y°-1*x) “2, 

> y°-l«xzxyer, (X*z)°2, (z*r)°2, 

> yxzxy°-lx*zx*r, (u,X), (U,y), (u,Z), (U,r), (Vv, xX), (V,y), (V7 Z), (Vr), 

> (w,X), (w,y), (W,Z), (Ww,r)>; 

> £1,H1,k1:=CosetAction(H, sub<H|Id(H)>); 

> s,t:=IsIsomorphic(H1,N); s; 

true 


Hence N = (5: 4) x S4. 
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6.1.4 Transitive Group(20,10) 


Let N be transitive group 10 on 20 letters. N = Dog is of order 40 and 
is generated by x = (1,19)(2, 20)(3, 18)(4, 17)(5, 16) (6, 15) (7, 13)(8, 14)(9, 12)(10, 11) 
and y = (1,3,5,8, 10, 11, 14, 16, 18, 19,2, 4,6, 7,9, 12, 13, 15, 17,20). In the same man- 


ner as before, we find the following presentation, 


Gaon isle a) at ay); yey oy a ae ey 
(xyt¥”)"6, (ctY ey)", (yPt)"8, (yee? )°9, (xt)"!, (xt¥)"!, (y 10g¢gy)r12 (y 104¢y"* yr33, 
(yeey? )r14 (y9tt¥” P25, (yee )r16, (xyt¥)"", (xt¥ty "18, (xtY' “ey yrl9 (xytt? “Ey? P20. 
14 16 14 3 6 2 15 2 
CT a an Hae iar (0 a to Mi 20a ee Oa 
(cyt? t¥" "28, (y8tey” )r29, (xt¥" ty" )r30, (xytY tv? )r31, (xyt)"32, (ttt \r33 (y7tty” )r34 a 


Table 6.4: 2*2° : Dag 


rl v2 rg. ra yO 76 rf v8 79 y1O vid rl2 rig -rl4 15 vie v1? rls 119 20 21 
Is 3 5 0 9 0 0 0 0 0 0 0 0 0 0 
2. 4 0 5 3 0 =O 0 0 0 0 0 0 0 
3. 4 3 0 0 3 0 0 0 0 0 0 0 0 0 
4. 10 3 10 5 38 0 O 0 0 0 0 0 0 0 
5. 0 0 35 5 5 0 0 0 0 0 0 
6. 3 0 0 0 2 0 7 0 0 0 0 0 0 
ts 3 0 0 0 2 0 9 0 0 0 0 0 0 
8. 0 O 0 O 0 2 5 3 0 0 0 
9. 0 0 3 0 O 0 9 9 5 0 0 0 
10. 0 0 0 0 0 0 0 0 0 0 0 
11. 0 0 0 0 0 0 0 0 0 0 0 
12. 0 O 0 O 0 0 0 0 0 0 0 
13. 0 0 0 O 0 0 0 0 2 3 10 
14. 0 O 10 0 0 0 0 0 0 0 0 
15. 0 O 10 O 0 0 2 0 0 0 0 
16. 0 0 10 O 0 0 6 0 0 0 0 
Nv. 0 0 0 O 0 0 0 0 0 0 3 
18. 0 O 0 0 0 0 0 0 0 0 0 
19. 0 0 0 O 0 0 0 0 0 0 0 
20. 0 0 0 0 0 0 0 0 0 0 0 


Table 6.5: 2*?° : Dog continued 
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r22 123 r24 r25 126 r27 128 r29 130 131 r32 133 134 Order G 

1. 0 0 0 0 0 0 0 0 0 0 0 0 0 6840 2°L2(19) 

2; 0 0 0 0 0 0 0 0 0 0 0 0 0 13680 2x PGL(2,19) 

3. 0 0 0 0 0 0 0 0 0 0 0 0 0 31680 23 :* (2: (La(11) x 3)) 
4. 0 0 0 0 0 0 0 0 0 0 0 0 0 249600 2°(2: U(3,4)) 

5. 0 0 0 0 0 0 0 0 0 0 0 0 0 6840 L[2(19) x 2 

6. 0 0 0 0 0 0 0 0 0 0 0 0 0 336 PGL(2,7) 

ts 0 0 0 0 0 0 0 0 0 0 0 0 0 4896 PGL(2,17) 

8. 0 0 0 0 0 0 0 0 0 0 0 0 0 410400 PGL(2,19) x As 

9. 0 0 0 0 0 0 0 0 0 0 0 0 0 6840 PGL(2,19) 

0. || 0 3 2 0 0 0 0 0 0 0 0 0 0 41040 PGL(2,19) x As 

1. |} 2 5 2 0 0 0 0 0 0 0 0 0 0 68400 5 :° (PGL(2,19) x 2) 
2. || 2 10 2 0 0 0 0 0 0 0 0 0 0 36800 10 :* (PGL(2,19) x 2) 
3.10 10 10 O 0 0 0 0 0 0 0 0 0 3680 =. 2° L2(19) 

4. || 0 0 0 0 3 3 10 33 0 0 0 0 0 744000 L3(5) : 2 

5. || 0 0 0 0 5 9 10 3 0 0 0 0 0 320 PGL(2,11) 

6. || 0 0 0 2 0 5 10 10 O 0 0 0 0 2640 PGL(2,11) x 2 

7. || 0 0 0 0 0 0 0 0 3 0 0 0 0 6840 PGL(2,19) 

8. || 0 0 0 0 0 3 0 0 0 0 0 3 2 37760 PGL(2,41) x 2 

9. || O 0 0 0 0 3 0 0 0 3 2 ff 7 34440 = L2(41) 
20. || 0 0 0 0 0 3 0 0 0 3 2. 10 4 320 PGL(2,11) 


Proof of the Isomorphism for the Shape of N 


The composition series of N is given below. 


G 

Cyc] 
* 

Cyc] 
*x 

Cyc] 
* 

Cyc] 


lic(2) 


lic(5) 


Lic(2) 


Lic(2) 


G = Gj D G2 D G3 D 1, where 


G = (G/G1)(G1/G2)(G2/G3)(G3/1) = CoC5C2C2. 


The Normal Lattice of N is 
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oN, 


es 


Order(2 ols 
oi 10) Be He 10) 
eee 


s:=IsIsomorphic(N, DihedralGroup (20) );s; 
true 


6.1.5 Transitive Group(20,11) 


Let N be transitive group 10 on 20 letters. N = 2°Dyo is of order 40 and 
is generated by x = (1,17, 2, 18)(3, 16, 4, 15) (5, 14, 6, 13)(7, 12, 8, 11)(9, 20, 10,19) and 
y = (1,4, 6,7, 10)(2, 3, 5,8, 9)(11, 13, 16, 17, 20, 12,14, 15, 18,19). In the same manner 


as before, we find the following presentation, 


Er ys tla, (a~ y 1)? (xy “1/2 y 10 t2, (t, y?), (y2tr vrrey? rl (perv? )r2, (tery? e)r3 
6,3 


y 
(wyt? 9? tr vey? rd, (yemyPe yr, (cee¥?tY*) "6, (e2y2er rrery rT, (eyt)"8, (y4tt¥)"? >. 


Table 6.6: 2*?° : 2° Dy 
rl r2 r3 r4 r5 r6 r7 r8& r9 Order G 
31200 = L2(25) x 2? 
158400 2°(Lo(11) x As) 
940800 2? x L(49) 
2640 2° PGL(2, 11) 
4368 2° PGL(2, 13) 


CO] Oy} | w]e 
SO] CO] dy] Ww] cw 
SO] Ol] wy] & 
fon) EN) Ren en) Re) 
So] eB} O;}O!}| oO 
SO] oy ao] oO] © 
WwW] O}O;|oO!;|o 
NI] CO] oO] CO} © 
Ol CO] OO; O!|oQ 


Proof of the Isomorphism for the Shape of NV 


The composition series of N is given below. 


Cyclic (2) 


Cyclic(5) 


Cyclic (2) 


Cyclic (2) 


G = G1 D G2 D> G3 D 1, where 
G = (G/G1)(G1/G2)(G2/G3)(G3/1) = CeC5C2C2. 


The Normal Lattice of N is 


[1] 
ee ord3s) 


/ \ 


Gehakay Sela 


Pie 


ae 20) ead Piles 


Slee” 


ed a 


We find the center of NV. 


> Center (N); 


Permutation group acting on a set of cardinality 20 


Order = 2 
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(1, 2) (3, 4) (5, 6) (7, 8) (9, 10) (11, 12) (13, 14) (15, 16) 
(17, 18) (19, 20) 
> NL[2] eq Center(Gl); 
true 


We will factor by the center of N and examine the factor group q. 


> gq, ff£:=quo<Gl|NL[2]>; 

> nl:=NormalLattice(q) ; 
> nis 
Normal subgroup lattice 


7] Order 20 Length 1 Maximal Subgroups: 4 5 6 
6 Order 10 Length 1 Maximal Subgroups: 3 

5 Order 10 Length 1 Maximal Subgroups: 2 3 
4] Order 10 Length 1 Maximal Subgroups: 3 

[3] Order 5 Length 1 Maximal Subgroups: 

[2] Order 2 Length 1 Maximal Subgroups: 

1] Order 1 Length 1 Maximal Subgroups: 


> s:=IsIsomorphic(q,DihedralGroup (10));s; 
true 


We see that q is isomorphic to Dig. Thus we will have a central extension of 2 by 
Dio. Now we need to write a presentation for g = Dg and proceed to verify our 


isomorphism. 


> FPGroup (qd); 
Finitely presented group on 2 generators 
Relations 

$41°2.=. TAS) 

($,2°-1 * $.1)*2 = Id(S) 

$.2°10 = Id($) 
F<x, y>:=Group<x,y|x°2, (y°-1*x) “2,y°10>; 
f1,F1,k1:=CosetAction(F,sub<F|/Id(F)>); 
s,t:=IsIsomorphic(F1l,q); 
S; 


VV VV 


> T:=Transversal (G1,NL[2]); 
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> #7; 

20 

SEPA} y 

(Diy By. 6p 4 YS 95. TS 50°86) (55 alg. 1456 MCL; he; 2a ap (2s. AS; 
22, 19) (18, 25, 29, 24) (20, 27, 30, 23) (26, 32, 36, 33) (28, 
31, 37, 35) (34, 39, 40, 38) 

> AS=GLli(h,. 24. 6, 4): (3.9%. 137 8) (S5. Ll, 14y Fy) (LO, 6, -215- 7) 

> (22, 15, 22, 19) (18, 25, 29; 24)(20;, 27, 30, 23) (26, 32, 36, 

> 33) (28, 31, 37, 35) (34, 39, 40, 38); 

> Ske 

(Ly 3 LO, 18, 26, B45. 28; 207 127 S)2, Tp Loy 23 Sly 38, 32, 
2a M65. 28): (Ope Lg 19s 2 Say 39; 5 S349 25g UT OV Cg 235-217 
29, 36, 40, 37, 30, 22, 14) 

> Br=G1! (1, 3, 20, 18, 26; 34, 28, 20, 12,, 5) (2, 7, U5, °23,. 34; 

> 38, 32;. 24, 16, 8) (4, 11, 19, 27, 35, 39, 33, 25, 17, 9) (6, 13, 

> 21, 29, 36, 40, 37, 30, 22, 14); 

> 

> f£(A) eq q.1; 

true 

> f£(B) eq q.2; 

true 

> NL[2].1; 

> C:=G1!(1, 6) (2, 4) (3, 13) (5, 14) (7, 11) (8, 9) (10, 21) (12, 22) 

> (15, 19) (16, 17) (18, 29) (20, 30) (23, 27) (24, 25) (26, 36) (28, 

> 37) (31, 35) (32, 33) (34, 40) (38, 39); 

Phe 

Finitely presented group F on 2 generators 

Relations 
x°2 = Id(F) 
(y*-1 * x)*2 = Id(F) 
y°10 = Id(F) 

> for a an [T...2] do. af A°2 eq -C"1 then a; -end af; end) for; 

1 

> for iin [1..2] do if (B°-1*A)*2 eq C°i then i; end if; end for; 

2 

> for iin [1..2] do if B°10 eq C°i then i; end if; end for; 

2 

> H<c, x, y>:=Group<c,x,y|c°2, (y,Cc), (%,C),X° 2=c, (y°-1*x) *2,y°10>; 

> f1,H1,k1:=CosetAction(H, sub<H|Id(H)>); 

> s,t:=IsIsomorphic(H1,G1l); 

> sg; 

true 


302 


Thus N = 2° Dyo. 


6.1.6 ‘Transitive Group(20,12) 


Let N be transitive group 10 on 20 letters. N = (5 x D4) is of order 
40 and is generated by x = (1, 13,8, 20, 4, 15, 10, 12,5, 18, 2, 14, 7, 19, 3, 16, 9, 11, 6, 17) 
and y = (1,19, 9,18, 7,15, 5, 13, 4, 11)(2, 20, 10, 17, 8, 16,6, 14, 3, 12). In the same man- 


ner as before, we find the following presentation, 


1 


Gaede ey ee ae a eee ee es) 


(y- ta hey" yr? (yxyt)", (ya tye)", (xyatt®’)", (x3t)"6, (xyxtt®)"7 Se 


Table 6.7: 2*29 : (5 x D4) 

r7 Order G 
31680 2:* (2: (La(11) x 3)) 
1320 PGL(2, 11) 
1344 4 :* (PGL(2,7)) 
31680 2° -* (2: (Za(dl) x 3)) 
249600 2: U(3,4) 
6840 L2(19) 
10 3993600 Co * U(38, 4) * C2 * C2 * C2 * Co K Co 
672 2 x PGL(2,7) 
2 4896 2° L2(17) 


KR 
ray 
HK 
ie) 
KH 
w 
KR 
ey 
K 
OU 
KR 
a 


Se) 


SL OlL Os] oO] CO] OF] WY] BO] oO 
SPO O; Oo] CO] OF] Wy} ou & 
Sol Oo} oO] OO} ©] OC] ©] Ot] © 
OO] MD] CO] W] Co} WW] CO] CO] 
WIL Wl) DMm) CO) oO;o;o;lo| co 
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Proof of the Isomorphism for the Shape of N 


The composition series of N is given below. 


Cyclic (2) 
Cyclic(5) 


Cyclic (2) 


Cyclic (2) 
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G = G1 D G2 D G3 D 1, where 
G = (G/G1)(G1/G2)(G2/G3)(G3/1) = CeC5C2C2. 


The Normal Lattice of N is 


3 [2] 


lela ae 4) ie) V1, ) ie) ii 


[9] [8] [11] [10] 
Order(20) oo we Order(20) 
[12] 

Order(40) 


It is possible that we have a direct extension. 


> s:=IsIsomorphic(N,DirectProduct (CyclicGroup(5),DihedralGroup (4)));s; 
true 


Thus N = (5 x D4). 


6.1.7 Transitive Group(20,13) 


Let N be transitive group 10 on 20 letters. N is of order 40 and is gen- 
erated by « = (1,13, 18,6)(2, 14, 17, 5)(3, 7, 16, 11)(4, 8, 15, 12)(9, 10)(19, 20) and y = 
(1,3, 5,8, 10, 12, 14, 16, 18, 19)(2, 4,6, 7,9, 11, 13, 15,17, 20). In the same manner as be- 


fore, we find the following presentation, 
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Geen ey eye a ee ey ey) eo: 


(xt¥" 


(a 1yry?e? re (xt eyeytyyrs, (xtveygyr yr (x2y1er?y? yr , 
(cyt? 24y2)"6, (xytt¥®)'7, (ah eytueye)rs | (xyt)”, 
(xt ety?t)"10 (x2g2v?e? rll (x2tt¥ry)r12 (ytry?2” ris 
) o] ’ 9 
(x2y-1¢)""4, (y- tam heey? 2 yr, (x2y-leey?e)"16 (x2¢y*2)r17, 
(xytt¥’ "8, (wt?¥°e?)r19 (y-tam hey? eqye)r20, (yt? @ey)r21, 
alas (xyt? 24? 23, (x?tt¥" "24, (xyt® ¥)"25, (x2y hey? rey? 726 


(yt tty? yr27, (x lyy*e)r28 (leew? eyyr29 a 


Table 6.8: 2*2° : (4° : 10) 


KH 
Re 
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be 
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SLO DOO OO; OG] Ol oO], OG] GP Ol ola) a] Oo] GO] OC] ww 


SLOP Ol] OL QO], Op OQ) OQ) OG) OPO} OQ) OG] BLO] OG) OG] GO] OG} or 
SPSPESPSpPSpSeyeyepeleyel Spey aySpeyele1el ella 


SLO] OP OP OPO, OO] GO] Ol CO] OG] OP OPO; Ol oy o; oy Oo] & 
SLO DODO OO] OG] GO] GO] OG] CO] OS] SO} Ot Or ww] Co] Cw] © 
SLO DOGO OG] GO] OG] OG] GO] OS] SO] EO} ot CG] WO] NI] © 
SILO] OP OPO} OO] GO] Of OC] CO] CO] O] OC] HB] Ot] CO] NY] CO] © 
SILO] OP OP OPO, OG] GO] Ol OO] OO] OP OPO; Ol a) oO} oy oa} oO 
SLO] OOOO] oO] GO] CO] CO] CO] OG] OC] CO] OD] GO] OG] OG] CO] oO 
fan] Kan) Ras) Ras) as) Ras Ran) Ra a ee ee 0 8) eee) Be Ce) 
SLO] OO] SO] SO] SO] W] Ww] WW] OG] DL Ol Ola) a) oO] oO] co] co 
SLO] OOO] OD] OG] CO] NY] NY] ) W] WL oO!) O) QO) OQ} QQ] ao} co 


Sl OPO} Oo] OJ OPO] OO] CO], Oo] CO] oO 
fon) Ran) Ran) Rae) ee Kae he) ee eee) 
CLR NB] BY] BR] CO] DI RD] DH) OPN] & 


on) Ken) Rae) Ree) Rae) Fa Kan) Ko) 
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Table 6.9: 2*7° : (4° : 10) continued 


rl7 rl8 rl9 r20 r21 122 123 r24 r25 126 r27 128 r29 Order G 
1 0 0 0 0 0 0 0 0 0 0 235200 2: PGL2(49) 
2 0 0 0 0 0 0 0 0 0 0 336 PGL,(7) 
3 0 0 0 0 0 0 0 0 0 0 504 L(8) 
4 0 0 0 0 0 0 0 0 0 0 3420 L£2(19) 
5 0 0 0 0 0 0 0 0 0 0 660 £2(11) 
6 0 0 0 0 0 0 0 0 0 0 6840 PGL(2, 19) 
7. ||O0 0 0 60 0 0 0 0 0 0 322560 28" : (2: L3(4)) 
8 8 8 0 0 0 0 0 0 0 0 1320 PGL(2, 13) 
9. 2 4 0 0 0 0 0 0 0 0 34440 L2(41) 
0. | 8 6 0 0 0 0 0 0 0 0 2448 L2(17) 
1. ]/ 10 10 0 0 0 0 0 0 0 0 1092 L2(13) 
2.|/10 10 0 0 0 0 0 0 0 0 24360 PGL(2, 29) 
3. |} 10 10 0 0 0 0 0 0 0 0 20520 Ss: L(19) 
4. || 0 0 0 9 8 2 0 0 0 0 0 23336640 C2 A5 x Lo(73) 
5. |} 0 0 0 4 9 2 0 0 0 0 0 101232 2 x PGL2(37) 
6. || 0 0 0 5 6 2 0 0 0 0 0 13680 2 x PGL2(19) 
7. || 0 0 0 6 5 6 0 0 0 0 0 2640 2 x PGL2(11) 
8. |} 0 0 5 5 8 10 2 0 0 0 0 0 161280 4°(2 : L3(4)) 
9. | 0 0 5 10 5 10 2 0 0 0 0 0 6600 L£(11) x Ds 
20. || 0 0 0 0 4 0 1 10 «6 9 8 10 499200 C2 « U(3,4) * C2 * C2 


Proof of the Isomorphism for the Shape of N 


The composition series of N is given below. 


G 

Cyclic (2) 
* 

Cyclic (2) 
* 

Cyclic (5) 
* 

Cyclic (2) 


G = Gj D G2 D G3 D 1, where 
G = (G/G1)(G1/G2)(G2/G3)(G3/1) = CeC5C2C2. 


The Normal Lattice of N is 


i. 
[2] [3] 


Order(2) Order(5) 


ae 


[4] [5] [6] 
Order(10) | Order(10) Order(10) 

[7] [8] [9] 
Order(20) Order(20) Order(20) 


|“ 


[10] 
Order(40) 
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We find that the center of N is NL[2]. However we see that NL[2] is not the largest 


abelian subgroup. Since NL|4] = Cio is the largest abelian subgroup then we will 


have a mixed extension. 


> Center (N); 


Permutation group acting on a set of cardinality 20 


Order = 2 
(1, 12) (2, 11) (3, 14) (4, 13) (5, 16) (6, 
20) (10, 19) 

> NL[2] eq Center (N); 

true 

> for iin [1..10] do if IsAbelian(NL[i]) 

1 

2 

3 

4 


> gq, ff£:=quo<N|NL[4]>; 
> nl:=NormalLattice(q) ; 


Lo isChe. Le LS) C97 


then i;end if;end for; 


> nl; 


Normal subgroup lattice 


[3] Order 4 Length 1 Maximal Subgroups: 2 


[2] Order 2 Length 1 Maximal Subgroups: 1 


[1] Order 1 Length 1 Maximal Subgroups: 


> s:=IsIsomorphic(q,CyclicGroup (4)); 

> s; 

true 

> H<a>:=Group<ala”4>; 

> f1,H1,k1:=CosetAction(H, sub<H|Id(H)>); 
> s,t:=IsIsomorphic(H1,q); s; 


true 

> T:=Transversal (N,NL[4]); 

> #T; 

4 

Sy 

(li, L3p- 23; 6) (2, 24, BE Sys; 75 Ley Dh ts, 8; 25; 
10) (19, 20) 

> A:=N! (1, 13, 18, 6) (2, 14, 17, 5) (3, 7, 16, 11) (4, 


SOLD) AD LOY CL 7-203 
> OF 
Permutation group q acting on a set of cardinality 4 
Order = 4 = 2°2 
(2 2 37 &) 
Id(q) 
> ££(A) eq q.1; 
true 
> Order (A); 
4 
> IsCyclic(NL[4]); 
true 
> Order (NL[4].1); 
10 
> NL[4].1; 
(Tyo Bn. Sys By “LO, TA hay V6 gp BE j. 9). 2: Ae 6. iy, “94 
13% Lop LY, 20) 
> B:=N! (1, 3, 5, 8, 10, 12, 14, 16, 18, 19) (2, 4, 6, 
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> Lk, 1382S; 27, .20)3 
> for iin [0..10] do if B°A eq B*i 
for|if> for|if> then i; break; end if; end for; 


7 

> H<b, a>:=Group<b,a|b°10,a°4,b°a=b°7>; 
> £,h,k:=CosetAction (H, sub<H|Id(H)>); 
> #h; 

> s:=IsIsomorphic(h,N); 

S83 

true 


Thus N & 4° : 10. 


6.2 ‘Transitive Groups on 19 Letters 


Using the following code we find that there are 8 transitive groups on 19 


letters. 


> #TransitiveGroups (19); 
8 


We will examine some of these groups and write progenitors. 


6.2.1 Transitive Group(19,2) 


Let N be transitive group 10 on 19 letters. N = (2 : 19) is of order 38 
and is generated by x = (1,2,3,4,5,6,7,8,9,10, 11, 12, 13,14, 15,16,17,18,19) and 
y = (2,19)(8, 18) (4, 17)(5, 16) (6, 15)(7, 14)(8, 13)(9, 12)(10, 11). In the same manner 


as before, we find the following presentation, 


— am 6 
G =< L,Y, tly?, (a Pay"; x ie i, (t, yx"), (Pets (on. GA, (prs, (yt® yr, (z#)"° 4 


Table 6.10: 2*#° : (2: 19) 
rl r2 r3 r4 r5 r6 Order G | 


5 3 5 10 0 0 6840 PGL,(19) | 
0 0 0 0 3 8. 25308 L2(37) | 
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Proof of the Isomorphism for the Shape of NV 


> S:=Sym(19); 

> xx:=S!(1,2,3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 
> 18, 19); 

> yy:=S!(1, 18) (2, 17) (3, 16) (4, 15) (5, 14) (6, 13) (7, 12) (8, 
> 11) (9, 10); 

> N:=sub<N|xx,yy>; 

> #N; 


> NL:=NormalLattice(N); 
> NL; 
Normal subgroup lattice 


[3] Order 38 Length 1 Maximal Subgroups: 2 
en Order 19 Length 1 Maximal Subgroups: 1 
an Order 1] Length 1 Maximal Subgroups: 

> IsIsomorphic(NL[2],CyclicGroup(19)); 


true 
> H<x>:=Group<x|x719>; 
> £,H1,k:=CosetAction(H, sub<H|Id(H)>); 
> s:=IsIsomorphic(NL[2],H1);s; 
true 
> for i in NL[3] do if i notin NL[2] and Order(i) eq 2 and 
for|if> sub<N|i,NL[2]> eq N then C:=i; 
for|if> break; end if; end for; 
> FPGroup (N); 
Finitely presented group on 2 generators 
Relations 
$.1°4 = Id($) 
$.1*-1 *« $.2*-1 * $.1°2 « $.2°-1 * $.1°*-1 = Id(S) 
$.2°-1 * $.17-1 * $.2°-1 * $.1 * $.2°-2 = Id(S$) 


> NN<x, y>:=Group<x,yly°2, (x*-1l*y) “2,x°-19>; 

> Sch:=SchreierSystem (NN, sub<NN|Id(NN) >); 

> ArrayP:=[Id(N): 1 in [1..38]]; 

> for 2 an [2.38] do 

for> P:=[Id(N): l in [1..#Sch[i]]]; 

for> for j in [1..#Sch[i]] do 

for|for> if Eltseq(Sch[1i]) [Jj] eq 1 then P[j]:=xx; end if; 
for|for> if Eltseq(Sch[i]) [Jj] eq 2 then P[j]:=yy; end if; 
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for|for> if Eltseq(Sch[i]) [Jj] eq -1 then P[j]:=xx*-1; end if; 
for|for> end for; 

for> PP:=Id(N); 

for> for k in [1..#P] do 

for|for> PP:=PP*P[k]; end for; 

for> ArrayP[1]:=PP; 

for> end for; 

> for i in [1..#NN1] do if ArrayP[i] eq A°C then print Sch[i]; 
for|if> end if; end for; 

x°-1 

> H<y,x>:=Group<y,x|x°19,y°2,x° y=x"-1>; 

> £2,H2,k1:=CosetAction(H, sub<H|Id(H) >); 

> IsIsomorphic(H2,N); 

true 


Thus N = (2: 19). 


6.3. Transitive Groups on 11 Letters 


Using the following code we find that there are 8 transitive groups on 11 


letters. 


> NumberOfTransitiveGroups (11); 
8 


We will examine some of these groups and write progenitors. 


6.3.1 Transitive Group(11,2) 


Let N be transitive group 2 on 11 letters. N = (2:11) is of order 22 and is 
generated by x = (1, 2,3,4,5,6,7,8,9,10,11) and y = (1, 10)(2, 9)(3, 8)(4, 7)(5,6). In 


the same manner as before, we find the following presentation, 


G <a,y,tly?, (ty), 0°", t, (t, ya"), (wt), (at), (wt), (w*t)™, (wt)? >. 


Table 6.11% 2** : (2% 11) 


rl r2 r3 r4 rd Order G 

3.0 5 10° 6 2703360" 97: PALA; 11) 
0 3 5 O 5 - 1320 PGL(2, 11) 

0 3 6 0 6 190080 2: My» 

0 0 0 4 3. 12144 PGL(2, 23) 


Proof of the Isomorphism of N 


> S:=Sym(11); 

> xx:=S!(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11); 
> yy:=S!(1, 10) (2, 9) (3, 8) (4, 7) (5, 6); 

> N:=sub<S|xx,yy>; 

> #N; 

22 

> NormalLattice(N); 


Normal subgroup lattice 


[3] Order 22 Length 1 Maximal Subgroups: 2 
[2] Order 11 Length 1 Maximal Subgroups: 1 
[1] Order ] Length 1 Maximal Subgroups: 


> CompositionFactors(N); 


Cyclic (2) 


Cyclic(11) 


> NL:=NormalLattice (N); 
> s:=IsIsomorphic (NL[2],CyclicGroup(11));s; 
true 
> FPGroup (N); 
Finitely presented group on 2 generators 
Relations 
S2°2 = TAS) 
($.1°-1 * $.2)°2 = Id(S$) 
$.1°-11 = Id(S$) 
> G<x, y>:=Group<x,y|ly°2, (x°-l*y) *2,x° 11>; 
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£,G1,k:=CosetAction(G, sub<G|Id(G)>); 
#k; 
NL:=NormalLattice (G1); 
H<x>:=Group<x|x° 11>; 
f1,H1,k1:=CosetAction (H, sub<H|Id(H)>); 
s,t:=IsIsomorphic(H1,NL[2]);s; 


true 

> for i in NL[3] do if i notin NL[2] and Order(i) eq 2 and 
for|if> sub<Gl/i,NL[3]> eq Gl then E:=1; break; end if; end for; 
> A:=t (f1(x)); 


> 


N1:=sub<NL[3] |A>; 


> NN<a>:=Group<a|a~11>; 

> Sch:=SchreierSystem (NN, sub<NN|Id(NN) >); 

> ArrayP:=[Id(N1): i in [1..#N1]]; 

> Sch:=SchreierSystem (NN, sub<NN|Id(NN) >); 

> for i in[2..#N1] do 

for> P:=[Id(N1): I in [1..#Sch[i]]]; 

for> for j in [1..#Sch[i]] do 

for|for> if Eltseq(Sch[1i])[j] eq 1 then P[Jj]:=A; end if; 
for|for> if Eltseq(Sch[i])[j] eq -1 then P[j]:=A*-1; end if; 
end for; 

for> PP:=Id(Nl1); 


for> for k in [1..#P] do 
for|for> PP:=PP*P[k]; end for; 
for> ArrayP[1]:=PP; 

end for; 


for iin [1..#N1] do if ArrayP[i] eq A” 


tH 


then print Sch[il]; 


for|if> end if; end for; 


ae 


o 
> 
> 


Aa 


H<x, e>:=Group<x,e|x°11,e°2,x°e=x"-1>; 
f1,H1,k1:=CosetAction (H, sub<H|Id(H)>); 
s,t:=IsIsomorphic(H1,Gl);s; 


true 


Thus N &2:11. 


6.3.2 Transitive Group(11,5) 
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Let N be transitive group 2 on 11 letters. N = L(11) is of order 660 and is 
generated by x = (1, 2,3,4,5,6,7,8,9,10,11) and y = (2,10)(3, 4)(5,9)(6,7). In the 


same manner as before, we find the following presentation, 


GlCday dat) a ge oa) ee) ee eG 
((yx?)?#6x?))"2, (ya5t)??, (ya®t®)"3, (yt "4, (at), (x?t)"6 >. 


Table 6.12: 2* : (Lo(11)) 


rl r2 13 r4 rd r6 Order G | 
5 065 O00. = 660 L2(11) || 
0 0 0 0 6 O 351120 4x2 | 
0 0 5 0 0 0 175560 J | 


Proof of the Isomorphism of N 


> N:=TransitiveGroup (11,5); 
> #N; 

660 

> Generators (N); 


(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11), 
(2, 10) (3, 4) (5, 9) (6, 7) 


} 
> S:=Sym(11); 

KPH SI (1 Zip Sy. Ay SK Oy Te 8,9, “20, L1)3 
> yy:=S!(2, 10) (3, 4) (5, 9) (6, 7); 

> N:=sub<S|xx,yy>; 

> 


#N; 
660 
> N:=sub<S|xx,yy>; 
> #N; 
660 
> CompositionFactors(N); 
G 
| A(1, 11) = L(2, 11) 
1 


> s:=IsIsomorphic(N,PSL(2,11));s; 
true 
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6.4 Transitive Groups on 6 Letters 


> #TransitiveGroups (6); 


16 


We will examine some of these groups and write progenitors. 


6.4.1 Transitive Group(6,3) 


Let N be transitive group 3 on 6 letters. N = 2 x S3 is of order 12 and 
is generated by x = (1,4)(2,3)(5,6) and y = (1,2,3,4,5,6). In the same manner as 


before, we find the following presentation, 


Qe ayy He ye) 
EP liwy), 


(xt¥)"1, (yt )"2, (xyt)"3, (yt), (yt) >. 


Table 6.13: 2*° : (2 x $3) 


rl +2 r3 r4 r5 Order G 

10 10 0 3 10 483840 (2x6): (L3(4) : 2) 
6 0 5 5 8 241920 6° : (L3(4) : 2) 
5 8 5 10 6 1320 2° D2(11) 

5 8 6 4 9 51840 2:8(4,3) 

5 8 6 8 8 380160 24x My 

4 2 8 7 10 322560 2% : L3(4) 

4 0 0 0 7. 4368 2x PGL(2, 13) 
0 0 0 3 7 2184 PGL(2, 13) 

0 0 3 0 7 24360 PGL(2,29) 

0 0 5 0 4. 13680 2x PGL(2,19) 
0 0 5 5 4 6840 PGL(2, 19) 


Proof of the Isomorphism of N 


> N:=TransitiveGroup (6,3); 


> #N; 
12 
> Generators (N); 


{ 


(1, 4) (2, 3) (5, 6), 
(Ly 23 By 4p Sy 6) 
} 
> S:=Sym(6); 
> xx:=S!(1, 4) (2, 3) (5, 
> yy:=S!(1, 2, 3, 4, 5, 
> 4 
> N:=sub<S|xx,yy>; 
> #N; 
12 
> CompositionFactors(N); 
G 
Cyclic (2) 
* 
Cyclic (3) 
* 
Cyclic (2) 


> NormalLattice (N); 


Normal subgroup lattice 


[7] Order 
[6 Order 
[5 Order 
[4 Order 
[3] Order 
[2] Order 
[J Order 


1 
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Maximal Subgroups: 4 5 6 


Maximal Subgroups: 2 3 
Maximal Subgroups: 3 
Maximal Subgroups: 3 


Maximal Subgroups: 
Maximal Subgroups: 


n 


Maximal Subgroups: 


> s:=IsIsomorphic (N,DirectProduct (Sym(3),CyclicGroup(2)));s; 


true 


6.4.2 Transitive Group(6,9) 


Let N be transitive group 9 on 6 letters. N = 53 x $3 is of order 36 and 
is generated by x = (1,4)(2,5)(3,6), y = (2,4,6), and z = (1,5)(2,4). In the same 


manner as before, we find the following presentation, 


2 1 1 


G=< ZY, ate? a, a, (yz, (az), y 
t, (t,y), (t,ezyry), 


(xyat)", (ayato)"?, (wy layt)", (wyt)"4, (wayt)", (44) = wzyay-! > 


Table 6.14: 2*6 : (53 x $3) 


LY “LYLYL, 


rl r2 r3 r4 r5 m Order G 


6 0 0 0 4 3753792 2« L3(7) 


451584 2? :* (Lo(7) x Le(7)) : 27) 


2 
0 0 760320 (Mjp2: 2) x 2? 


Proof of the Isomorphism of N 


> N:=TransitiveGroup (6,9); 
> #N; 

36 

> NL:=NormalLattice (N); 

> NL; 

Normal subgroup lattice 


[10] Order 36 Length 1 Maximal Subgroups: 7 8 9 


9 Order 18 Length 1 Maximal Subgroups: 5 6 
8 Order 18 Length 1 Maximal Subgroups: 6 
7 Order 18 Length 1 Maximal Subgroups: 4 6 


6 Order 9 Length 1 Maximal Subgroups: 2 3 
5 Order 6 Length 1 Maximal Subgroups: 2 
4 Order 6 Length 1 Maximal Subgroups: 3 


3 Order 3 Length 1 Maximal Subgroups: 1 
2 Order 3 Length 1 Maximal Subgroups: 1 
HE Order 1 Length 1 Maximal Subgroups: 


> s:=IsIsomorphic(G1,DirectProduct (NL[5],NL[4]));s; 


true 

> NL[5]; 

Permutation group acting on a set of cardinality 3 
Order = 6 =2 x 3 
(1, 2) (3, 9) (4, 7) (5, 12) (6, 13) (8, 16) (10, 18) (11 


’ 


6 
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, 20) (14, 24) 


(155. 2641 23) (19 F -20) ON; 25) (22. 28)~(29;, 


33) (30, 


36) (31, 
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35) (32, 34) 

(1, 27, 25) (2, 21, 19) (3, 28, 13) (4, 34, 36). (5, 16, 23) (6, 22, 9) 
Ch 30%, 32): 4842-1250 TE) C05. 24 BS) Cs 3 35. 26) (14s: 8 S2)(1S:; 
29, 20) 

> s:=IsIsomorphic(NL[5],Sym(3));s; 

true 

s:=IsIsomorphic(Gl,DirectProduct (Sym(3),Sym(3)));s; 


LEUe 


Chapter 7 


More Progenitors 


TA. Oe (3 e 


= 2 anh mp2 a)3 od —2 —1,,)2 - 
G=<0,0,2,y,2, tw, 2°, y" 2", x, (w v)*, (ay 


vz tz, (%z~*)?, (y, 2), wy 


2, (t,vy tw"), (toy ey”, 
(vt)", rca Wee (vee???) )r3 (yt) 5, 
(zterr))r6 (wt¥)"”, (vyt(w*r))r8 > 


1 1 


ie ys 


Table Tele 2" 372) 4) 


oye 


rl r2 r3 m rd r6 r7 r8& Order G 

3 8 3 3 0 0 0 O- 161280 4°(2: L3(4)) 
2 2 4 5 0 0 0 0. 3916800 2? x S(4,4) 

0 0 0 5 2 10 9 5 6840 PGL2(19) 

0 0 0 7 0 2 6 7 4368 2 x PGL2(13) 


7.2. Osa) 


GH=cag ile yo aye) (eu) rye 
rycyxy xy), 


t?, (t, yxyxytxy!ay7'), (t, yryxyry 


(ta)*, (tyrytayryxylxyryzry)!, (tt?) 
(yxy xyxyxyryry't)"', (yry! 


1 


ayryxyrycy btYey")) 


1 1 


1 


1 Ne, 


ry xy x 


1 


= yryryry “cryxyry Ly, 
r2 
’ 
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(yxyxyry tayxyxytat¥)"?, (yteyryry bey Leyryt rv) yr 


(xyt "5, ((ey)24)"6 > 


Table 7.2: 2*"9 : Lo(11) 


rl r2 k 1 m 3 r4 15 16 Order G | 
6 0 4 4 5 0 0 0 0 15840 Cox My, | 
0 0 8 4 3 0 0 0 5 7920 Mi, | 


7.3 ye : (C15 : C's) 


GH=<a.b.6.dAla".b?;d?a-7b,a- td ad + (od), aca te? bo: tae 1d, 
t?, (t,ac™*), 
(ebt®)"!, (ebt)"?, (cbt2)", (ct), (c?dt)” > 


Table 7.3: 2*' : (C15 : C4) 
rl r2 r3 r4 r5 Order G 
2 8 8 6 6 161280 Co* M12*C2*C2*C3 
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Chapter 8 


MAGMA Code 


8.1 Double Coset Enumeration of (5(4,3) : 2) 


> G<x,y,t>:=Group<x,y,t|x°3, (x*y°-1) “4, yx*xx*xy> -1L*x*-2*y°-Lexxyxx*-l, 
> y°-l*«x*-Ley*x*-Ley?-L*x«y 3*x, (x°-L*ey*2*x°-l*ey*-1)°2,t7°2, (t,y* 
> x7 2ey°-2*x7-Ley*x7-1), (t,x°-L*xy*-1*«x*-Ley*-3*x*y*-1), (t, (y*x* 
> y°-1)°3), (t,y°-1l*x7*3*y*-2), (x*y*t® (x73)) 76, (x *& yet? (x7 2*y*x72)) 74, 
> (kK * yet? (x72*y))78,x * t * x * y°-l * xe t ey eK et * KX * yl 
> * X * t * yo-l * t * xX * t * yp; 
> #G; 
51840 
> S:=Sym(10); 
> xx:=S!(1,2,4) (3,5,6) (7,8,10); 
> yy:=S!(1,3,2) (4,7,5,9, 6,8); 
> N:=sub<S|xx,yy>; 
> £,G1,k:=CosetAction (G, Sub<G|x,y>); 
> CompositionFactors (Gl); 
G 
Cyclic (2) 
* 
C23 ~ 3) = 8(4, 3) 


> s:=IsIsomorphic(N,Sym(5));s 


true 

> IN:=sub<Gl|f(x),f(y)>; 

> ts := [Id(Gl): iin [1 .. 10] ]; 

> /x* since there are 10 letters x«/ 

> ts[l]:=f(t); ts[2]:=f(t*>x); ts[3]:=f(t*y); ts[4]:=f (t* («*2)); 
> ts[5]:=f (t* (y*x)); ts[6]:=f(t* (y*x*2)); ts[7]:=f (t> (x*2*y)); 
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> ts[8]:=f (t* (x°2*yx*x)); ts[9] :=f (t* (y*x*y)); 
> ts[10]:=f (t* (x°2*y*x"2)); 
> prodim:=function(pt, Q, I) 
function> v:=pt; 
function> for i in I do 
function|for> v := v7 (Q[i]); 
function|for> end for; 
function> return v; 
function> end function; 
> #G/#N; 
432 
> cst := [null : i in [1 .. Index(G,sub<G|x,y>)]] where null is 
> [Integers() | ]; 
> for 2 2— 1, to: 10-.de 
for> cst[prodim(1, ts, [i])] := [i]; 
for> end for; 
> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 
10 
> #N1s; 
2 


~ ~ ~ 


~ 


~ ~ ~ ~ 


NNN N BH NHN DN NH 
~ 


~ 


> £Or 2 
> Orbit 


> Set (Nis); 


Nl), 
6, 9, 3, 4, 7) (5, 10, 8), 
4) (3, 6) (8, 10), 
9) (3, 7) (5, 10), 
Te By Se. 9% 26) Sy Sp 10); 
9, 4) (3, 7, 6) (5, 8, 10), 
6) (3, 4) (7, 9) (8, 10), 
9) (5, 8) (6, 7), 
7) (3, 9) (4, 6) (5, 10), 
4, 9) (3, 6, 7) (5, ao 
3) (4, 6) (7, 9), 
3) (4, 7) (5, 8) (6, 9) 


in [1..#T1] do ([1]*Nls)*T1[i]; end for; 
s(Nls); 


t{@ 1 @}, 
t{@ 5, 10, 8 @}, 
Efi@o 2p, By Ag hy “Op BO 4 


> for m,n in IN do if ts[1l]*ts[5] eq m«(ts[l]*ts[1])*n 
for|if> break; end if; end for; 

> for m,n in IN do if ts[1l]*ts[5] eq m«(ts[1])7n then " 
for|if> break; end if; end for; 

> 

> for m,n in IN do if ts[l]*ts[2] eq m«(ts[l]*ts[1])*n 
for|if> break; end if; end for; 

> for m,n in IN do if ts[1l]*ts[2] eq m«(ts[1])7n then " 
for|if> break; end if; end for; 

> 

> N15:=Stabiliser(N, [1,5]); 

> SSS:={[1,5]}; 

> SSS:=SSS°N; 

> #SSS; 

30 

> Seqq:=Setseq(SSS) ; 

> 

> for iin [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[5] eq 


for|for|if> 
for|for|if> 
fOr |.for|at> 
[ 1, 5 ] 

> 

> N15s:=N15; 
> N15s; #N15s; 

Permutation group N15 acting on a set of cardinality 10 


n«xts [Rep (Seqq[i]) [1] ]*ts[Rep (Seqq[i]) [2]] 
then print Rep(Segqq[i]); 
end if; end for; end for; 


Order = 4 = 2°2 
(2, 4) (3, 6) (8, 10) 
(2, 6) (3, 4) (7, 9) (8, 10) 
4 
> #N/#N15s; 
30 
> T15:=Transversal (N,N15s); 
> for i in [1..#T15] do 
for> ss:=[1,5]°T15[i]; 
for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 
> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1l; end if; end for; m; 
40 


> #N15s; 


then 


then 
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Verde” = 


tEue"; 


"true"; 


true"; 


a VV~ 


NVV VV 


0 


Set (N15s); 
(2, 4) (3, 6) (8, 
(2, 6) (3, 4) (7, 
(2, 3) (4, 6) (7, 
Id (N15) 


for i in 
Orbits (N15s); 


GSet{@ 1 @}, 
GSet{@ 5 @}, 
GSet{@ 7, 9 @}, 
GSet{@ 8, 
GSet{@ 2, 4, 6, 


[1..#T15] do 


10), 
9) (8, 
9), 


10 @}, 


3 @} 


10), 


N12:=Stabiliser(N, [1,2]); 


SS8S:={[1,2]}; 
SSS:=SSS°N; 
#SSS; 


> Seqq:=Setseq(SSS) ; 


> 
> 


for i in 


for> for n in IN do 


[1..#SSS] do 


for|for> if 
for|for|if> 
for|for|if> 
£ OF tox. \iavt> 


[i ee. Zod 

[ 1, 3 ] 

> 

> N12s:=N12; 

> for n in N do if 

for|if> N12s:=sub<N|N12s,n>; 

> N12s; #N12s; 

Permutation 
(4, 9) (5, 8) (6, 7) 
(2, 3) (4, 7) (5, 8) (6, 
(2, 3) (4, 6) (7, 9) 

4 


> #N/#N12s; 


ts[l]*ts[2] eg 


group N12s acting on a set of cardinality 10 


2) 


end for; 


end if; 


({1,5]°N15s) “T15[i]; 


n*ts [Rep (Seqq[i]) [1] ]*ts [Rep (Seqq[i]) [2]] 
then print Rep(Seqq[i]); 
end if; end for; 


1*n eq 1 and 2°n eq 3 then 


end for; 
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3.0 
> 


> T12:=Transversal (N,N12s); 


> 
fo 
fo 
fo 
> 
fo 
70 
> 
4 
> 


{ 


—= VV Vw 


fo 
Cr 
> 
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for done Elo tT 2] “do 
r> ss:=[1,2]°T12[1i]; 
r> cst[prodim(l, ts, ss)]:=ss; 
r> end for; 
m:=0; for iin [1..432] do if cst[i] ne [] 
r|if> then m:=m+1; end if; end for; m; 
#N12s; 
Set (N12s); 
(2, 3) (4, 7) (5, 8) (6, 9), 
(4, 9) (5, 8) (6, 7), 
(2, 3) (4, 6) (7, 9), 
Id(N12s) 
for i in [1..#T12] do ([1,2]°N12s)°T12[i]; end for; 
Orbits (N12s); 
GSet{@ @}, 
GSet{@ 10 @}, 
GSet{@ 2, 3 @}, 
GSet{@ 5, 8 @}, 
GSet{@ 4, 9, 7, 6 @} 
for m,n in IN do if ts[l]«ts[5]*ts[1] eq m«(ts[1]*ts[1])7n 
r|if> then "true"; break; end if; end for; 
for m,n in IN do if ts[1]«ts[5]*ts[1] eq m«(ts[1])7n 
r/if> then "true"; break; end if; end for; 
for m,n in IN do if ts[l]«*ts[5]*ts[1] eq m«(ts[1]*ts[5])7n 
r|if> then "true"; break; end if; end for; 
for m,n in IN do if ts[l]*ts[5]*ts[1] eq m«(ts[1]*ts[2])7n 
r/if> then "true"; break; end if; end for; 
for m,n in IN do if ts[l]«ts[5]*ts[5] eq m«(ts[1]*ts[1])7n 
r|if> then "true"; break; end if; end for; 
for m,n in IN do if ts[1]«ts[5]*ts[5] eq m«(ts[1])7n 
r|if> then "true"; break; end if; end for; 
ue 
for m,n in IN do if ts[1]«ts[5]*ts[5] eq m«(ts «ts[5])7n 


for|if> then 
> for m,n in 
r|if> then 
> for m,n in 
r|if> then 
> for m,n in 
if> 
for m,n 
if> then 
for m,n 
if> then 
in 


in 
in 
for m,n 
if> then 


for m,n in 
if> then 


in 
then 
in 
then 
in 
then 
in 
then 
in 
if> then 
in 
then 


in 
then 
in 
then 
in 
then 
in 
then 
in 
then 
in 
then 


Weruens 


IN do if 
Nowe ts 


break; 
ts[1]* 


end if; 


CS 


IN do if 
Merwe: 


break; 
ts[1]* 


end 


[5] *ts 
aie ¢ 


CS 


IN 
Nerval 


do if t 


break; 


[5] «ts 


end if; 


do if t 


break; 


Lerues 
IN 


do if t 


break; 


true"; 


true"; 


do if t 


break; 


dG) at Ut 


break; 


end 
[5] 
end 
[5] 
end 
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*ts[l])7n 
yA 

*ts )7n 
*ts )7n 


*xts[1l])7n 
)*n 

*ts eel 
xts[2])7n 
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> for m,n in IN do if ts[1l]*ts[5]*ts[2] eq m*(ts[l]*ts[5]*ts[8])7n 
for|if> then "true"; break; end if; end for; 


> for m,n in IN do if ts[l]*ts[2]«ts[1] eq m*(ts[1]«ts[1])7n 
if> then "true"; break; end if; end for; 
for m,n in IN do if ts[1]«ts[2]*ts[1] eq m«(ts[1])7n 
if> then "true"; break; end if; end for; 


Hh 
(0) 
Hh WK 


Hh 
(e) 
Hh oH 


for m,n in IN do if ts[l]«*ts[2]*ts[1] eq m«(ts[1]*ts[5])7n 
if> then "true"; break; end if; end for; 


Hh 
(e) 
Hh oH 


for m,n in IN do if ts[1]*ts[2]*ts[1] eq m«(ts[1]«ts[2])*n 
en "true"; br ak; end AF end EOKs 


for m,n in IN do if ts[l]«*ts[2]*ts[1] eq m«(ts[1l]*ts[5]*ts[1])7n 
en "true"; break; end if; end for; 


Kh 
e) 
a) 
. h- 
Fh 
Vv 
ct 
> 


Fh 
[@) 

Mb 
H 
Fh 
Vv 
ct 
ty 


for m,n in IN do if ts[l]*ts[2]*ts[1] eq m«(ts[1l]*ts[5]*ts[7])7n 
if> then "true"; break; end if; end for; 


Hh 
e) 
i eD) 


for m,n in IN do if ts[l]«*ts[2]*ts[1] eq m«(ts[1]*ts[5]*ts[8])7n 
en "true"; break; end if; end for; 


Hh 
e) 
) 
h- 
Hh 
Vv 
ct 
> 


> for m,n in IN do if ts[1]*«ts[2]«ts[1l 
if> then "true"; break; end if; en 
for m,n in IN do if ts[l]«*«ts[2]*ts[1 
en "true"; break; end if; en 
for m,n in IN do if ts[l]«ts[2]*ts[1 
if> then "true"; break; end if; en 
for m,n in IN do if ts[l]«*«ts[2]*ts[1 
en "true"; break; end if; en 
for m,n in IN do if ts[l]«ts[2]*ts[1l 
en "true"; break; end if; en 
for m,n in IN do if ts[l]«*«ts[2]*ts[1 
if> then "true"; break; end if; en 
for m,n in IN do if ts[l]«ts[2]*ts[1 
if> then "true"; break; end if; en 
for m,n in IN do if ts[l]«ts[2]+*ts[1 
if> then "true"; break; end if; en 


Hh 
e) 
Po 


Fh 
Oo 

MPH 
H- 
Fh 
Vv 
ct 
ty 


Hh 
e) 
Po 


Kh 
e) 
th WK 
h- 
Hh 
Vv 
ct 
> 


Hh 
e) 
hh WK 
h- 
Hh 
Vv 
£7 
> 


Hh 
(0) 
Hh WK 


Hh 
e) 
PK 


aAacaoaoaoRoacocAacand 


Hh 
e) 
) 


> for m,n in IN do if ts[l]*ts[2]«ts[2] eq m*(ts[1]«ts[1])7n 
for|if> then "true"; break; end if; end for; 


> for m,n in IN do if ts[l]*ts[2]*ts[2] eq m*(ts[1l])*n 
for|if> then "true"; break; end if; end for; 
true 
> for m,n in IN do if ts[l]*ts[2]«ts[2] eq m*(ts[1]«ts[5])7n 
for|if> then "true"; break; end if; end for; 
> for m,n in IN do if ts[l]*ts[2]*«ts[2] eq m*(ts[1]«ts[2])7n 


mR hh 


Mh BK 


KR FH 


Fh 


Lop en) SO po 


ry 


mR mR HH Hh SB 


Mh WK 


ry 


Chen 


en 
in 
en 
in 
en 
in 
en 
in 
en 
in 
en 


in 
en 
in 
en 
in 
en 
in 
en 
in 
en 
in 
en 
in 
en 
in 
en 
in 


in 
en 
in 
en 
in 
en 
in 
en 
in 
en 
in 


en 


true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[1l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]«ts[2]«*«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[1l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]«ts[2]«*«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 
N do if ts[l]*ts[2]«ts 
true"; break; end if; 


d 


for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
LOY; 
eq m 
for; 


eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 


for; 


eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 
for; 
eq m 


for; 
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*«ts[5]x*xts[1])7n 
xts[5]x*xts[7])7n 
x«ts[5]«xts[8])7n 
*ts *«ts[1])7n 
*ts *«ts[10])7n 
*xts[1l])7n 

)*n 

*xts[5])7n 
*ts[2])“n 
*«ts[5]xts[1])7n 
*«ts[5]xts[7])7n 
«ts *«ts[8])7n 
xts[2]xts[1])7n 
*xts[2]x*xts[10])7n 
*ts[1l])7n 

)*n 

*ts[5])“n 
*ts[2])“n 


30 


> 


ue 
for m,n in IN do if ts[l]«ts[2]*ts[4 
r|if> then "true"; break; end if; en 
for m,n in IN do if ts[l]«ts[2]*ts[4 
r|if> then "true"; break; end if; en 
for m,n in IN do if ts[l]«ts[2]*ts[4 
r|if> then "true"; break; end if; en 
N151:=Stabiliser(N, [1,5,1]); 
SSS2={)[175;, L144 
SSS:=SSS°N; 
#SSS; 

> Seqgq:=Setseq(SSS) ; 
for i in [1..#SSS] do 

for> for n in IN do 
r|for> if ts[1l]*ts[5]*ts[l] eq 


fo 
fo 


for|for|if> 
for|for|if> 


vr|for|if> 


eq mx ( 
for; 
eq mx ( 
for; 
eq mx ( 
for; 


ts[1] xt 


ts[1] xt 


ts[1] xt 


n*xts [Rep (Seqq[i]) [1] ]*ts[Rep (Seqq[i]) [2]]* 
ts [Rep (Seqq[i]) [3] ] 
then print Rep(Segqq[il]); 


for|for|if> end if; end for; end for; 
Pop de 
[2a ey, 22 
[ 4, 3, 4 
[ 3, 4, 3 
Digs Ley 8 
6p: 2p 6 
> N151s:=N151; 
> for n in N do if 1*n eq 2 and 5 °n eq 6 and 1*n eg 2 then 
for|if> N151s:=sub<N|N151s,n>; end if; end for; 
> for n in N do if 1*n eq 4 and 5°n eq 3 and 17n eg 4 then 
for|if> N151s:=sub<N|N151s,n>; end if; end for; 
> for n in N do if 1*n eq 3 and 5°n eg 4 and 17n eq 3 then 
for|if> N151s:=sub<N|N151s,n>; end if; end for; 
> for n in N do if 1*°n eq 5 and 5°n eq 1 and 17n eq 5 then 
for|if> N151s:=sub<N|N151s,n>; end if; end for; 
> for n in N do if 17n eq 6 and 5°n eg 2 and 17n eq 6 then 
for|if> N151s:=sub<N|N151s,n>; end if; end for; 
> N151ls; #N151s; 
Permutation group N15ls acting on a set of cardinality 10 
(2, 3) (4, 6) (7, 9) 
(2, 4) (3, 6) (8, 10) 
(1, 2, 3) (4, 5, 6) (7, 9, 8) 
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ts[8])7n 
ts[l])7n 
ts[10])7n 


~ 
od 


ro 
On ono Ww 
~ oYewrs 


~ oy Ly 
NN W 
w~SwrYs 


~ ~ ~ 


SS SSA A a 
~~ aN eaeS 
~ 


NoawP NN WYN SB 


~ 


~ oN 
~~ sw 


~ 


a7 is 
DDDHD UAHA HWWwWwo PP SP BN NY NY 


~~ 
— 


24 
> #N/#N1515; 
5 


5, O) C7. By 
(3, 4) (7, 9, 
(7, 8) 

Sp SY CT Oy 
65-29) Cla L0G 
(25. “O) OCR. Dy 
(7, 10) 

67. ~ 3): M71 pp By 
5, 4) (8, 10, 
(25 SOACT Sy 
(8, 9) 

(7, 8) (9, 10) 
(7, 10) (8, 9) 
6, 3) (7, 8, 
6, 4) (7, 10, 
3, 5) (7, 10, 
4, 5) (8, 9, 
(3, 4) (7, 10, 
(9, 10) 


> T151:=Transversal(N,N151s); 
> for 2. an [ls.#PiS1] do 
for> ss:=[1,5,1]°T151[i]; 
for> cst[prodim(l1, ts, ss)]:=ss; 


for> end for; 


> m:=0; for i in 


[1..432] do 


for|if> then m:=mt1; end if; 


75 

> #N151s; 

24 

> Set (N151s); 
{ 


~ ~ LY 
OY W Ww 
wv ws 


OO 
~ 
WO ANWUON DB ® 
Ys ws 
i) i) 
~ ~ 


~ 
Oo 
~ 


(7, 9) (8, 10) 
Cr ON 

4, 5) (8, 9, 
(39: ANE -8y 
6 Aya. Loy 
oy Ay (8, 10% 
B5-- SClyg  107 
Ge Behe 1By 
(25. SOG. By 


if cst[i] ne 
end for; m; 
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(Lig SO Cy. SOG: ON" y 

Vip iy Sp By (og: FO) UI! Qe Ey. BY yz 
(le Ag Sey By Say Oe LO Ny 
Id(N151s), 

(2, 4) (3, 6) (8, 10), 

(1, 3) (4, 5) (8, 9), 

(Up Sy C25. 6). 47 BS) 499 10) » 

(1, 2) (5, 6) (7, 8), 

(tp Zot Saw Se GS) Cy Op By 
(2, 3) (4, 6) (7, 9), 

(le ep ey ge Sy“ OG. Bp 10), 
(hyo Bip C2 ASS. Gy? SG) Cig Op BG 
(1, 5) (3, 4) (7, 10) (8, 9), 

Cle, (Sipe Ag big: SIT By BG 
(tp Oy Be 2)oy: 4) (77 10; ey 9) 


Orbits (N151s); 


— VV Vw 


GSet{@ 7, 9, 8, 10 @}, 
GSet{@ 1, 2, 4, 3, 5, 6 @} 


] 
> N157:=Stabiliser(N, [1,5,7]); 
> SSSé=f{ [2 pop 7 yy 

> SSS:=SSS°N; 
> #SSS; 


> Seqq:=Setseq(SSS); 
> for i in [1..#SSS] do 
for> for n in IN do 
for|for> if ts[l]xts[5]*ts[7] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 
[cys oy. oe 4 
> N157s:=N157; 
> N157s; #N157s; 
Permutation group N157 acting on a set of cardinality 10 
Order = 2 
(2, 4) (3, 6) (8, 10) 


2 
> #N/#N157s; 


for iin [1..#T151] do ([1,5,1]°N151s) *T151[i]; end for; 


330 


331 


60 

> T157:=Transversal (N,N157s); 

> for iin [1..#T157] do 

for>. ss:=[1,5,7)°T1L5.7 [4 )-3 

for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 


> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1l; end if; end for; m; 

135 

> #N157s; 


2 
> Set (N157s); 
{ 


(2, 4) (3, 6) (8, 10), 


Id (N157) 
} 
> for i in [1..#T157] do ([1,5,7]°N157s)°*T157[i]; end for; 
> Orbits(N157s); 
[ 
GSet{@ 1 @}, 
GSet{@ 5 @}, 
GSet{@ 7 @}, 
GSet{@ 9 @}, 
GSet{@ 2, 4 @}, 
GSet{@ 3, 6 @}, 
GSet{@ 8, 10 @} 
] 
> N158:=Stabiliser(N, [1,5,8]); 
> SSS:={[1,5,8]}; 
> SSS:=SSS°N; 
> #SSS; 
60 


> Seqgq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[5]*ts[8] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 
[dy wae 8h 

[ody Sy! LOLs 

> N158s:=N158; 


> for n in N do if 


for|if> N158s:=sub<N|N158s,n>; end if; 
> N158s; #N158s; 
Permutation group Nil 
(2, 3) (4, 6) (7, 9) 
(2, 6) (3, 4) (7, 9) (8, 10) 
(2, 4) (3, 6) (8, 10) 
4 
> #N/#N158s; 
30 
> T158:=Transversal (N,N158s); 
> for iin [1..#T158] do 
for> ss:=[1,5,8]°T158[i]; 
for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 
> m:=0; for i in [1..432] do if cst[i] 
for|if> then m:=mt+1l; end if; end for; 
165 
> #N158s; 
4 


> Set (N158s); 
{ 


> [1,5,8]7N158s; 
GSet {@ 


@} 

> LOL) as an 
> Orbits (N158s); 
[ 


[1..#T158] 


do 


GSe 
GSe 
GSe 
GSe 
GSe 


Vv 


t{@ 1 @}, 
t{@ 5 @}, 


t{@ 7, 
t{@ 8, 


t{@ 2, 


9 @}, 
10 @}, 
3, 6, 


4 


@} 


N121:=Stabiliser(N, [1,2,1]); 
SSS:={[1,2,1]}; 


end for; 


ne [] 
m; 


({1,5,8]°N158s) “T158[i]; 


1*n eq 1 and 5°n eq 5 and 8°n eq 10 then 


L58s acting on a set of cardinality 10 


end for; 


332 


333 


> SSS:=SSS°N; 

> #SSS; 

60 

> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[2]*ts[1] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 


Tee i, 

Styl 
[ 25 Bp 22 

Qe lig 2. 

Liye, Bp 

Spo Zip a3: 1] 
> N121s:=N121; 
> for n in N do if 1*n eq 3 and 2°n eq 1 and 17n eg 3 then 
for|if> N121s:=sub<N|N121s,n>; end if; end for; 
> for n in N do if 1*n eq 2 and 2°n eq 3 and 1*n eq 2 then 
for|if> N121s:=sub<N|N121s,n>; end if; end for; 
> for n in N do if 1*n eq 2 and 2°n eq 1 and 1*n eq 2 then 
for|if> N121s:=sub<N|N121s,n>; end if; end for; 
> for n in N do if 1*n eq 1 and 2°n eq 3 and 1*n eq 1 then 
for|if> N121s:=sub<N|N121s,n>; end if; end for; 
> for n in N do if 1°n eq 3 and 2°n eq 2 and 1°n eq 3 then 
for|if> N121s:=sub<N|N121s,n>; end if; end for; 
> N121s; #N121s; 
Permutation group N121s acting on a set of cardinality 10 


(4, 9) (5, 8) (6, 7) 

(Ly Sy <2) 4g Te Dp Die Op 8) 
(lop. Sp ZyGa ye Ge: DCT ge 8p 39) 
(i ty BY C4Y 38%. Oy) 95 By 7) 
(Ly 24 BYOC4g: B52 (6) CL 9p -'8) 
(1, 2) (5, 6) (7, 8) 

(1, 2) (4, 9) (5, 7) (6, 8) 
(2, 3) (4, 7) (5, 8) (6, 9) 
(2, 3) (4, 6) (7, 9) 

(1, 3) (4, 8) (5, 9) (6, 7) 
(1p 3) (4p 97 (84. 9) 


12 
> #N/#N121s; 
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10 

> 

> T121:=Transversal(N,N121s); 

> for 4. ain [lac#TI214 -doe 

for> Ss i= (1,2, 1) ° 1121 [14 

for> cst[prodim(l1, ts, ss)]:=ss; 

for> end for; 

> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 
175 

> #N121s; 

12 

> Set (N121s); 


(4, 9) (5, 8) (6, 7), 

(Ly 2p B44. 6): Che Oy 8) 
(lig: 2p BS) (Ay 8 Oy 97 Spo Ty 
(2, 3) (4, 6) (7, 9), 

(ly 3) (4, 5) (8, 2), 

(1, 2) (5, 6) (7, 8), 

(1, 3) (4, 8) (5, 9) (6, 7), 
Id(N121s), 

(2, 3) (4, 7) (5, 8) (6, 9), 
(ly 35 2) t4y. 67-0 DIAC 8% -D)5 
(Ey Sp ZIMA TE Dy Dy Gy. 84 
(Ty 2)°(45. 9) (er TF) (Oy 8) 


for i in [1..#T121] do ([1,2,1]°N121s) “T121[i]; end for; 
Orbits (N121s); 


— VV Vw 


GSet{@ 10 @}, 
GSet{@ 1, 3, 2 @}, 
GSet{@ 4, 9, 7, 6, 8, 5 @} 


] 
> N1210:=Stabiliser(N, [1,2,10]); 
> SSS:={[1,2,10]}; 
> SSS:=SSS°N; 

> #SSS; 

60 

> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[2]*ts[10] eg 


for|for|if> 
for |foxr,| a> 
fori |tor |ast> 
for | tor |st> 
[ 2p LO 
[ 37/10 
> N1210s:=N 
> 


N 


n«xts [Rep (Seqq[i]) [1] ]*ts[Rep(Seqq[i]) [2]]* 
ts [Rep (Seqq[i]) [3]] 

then print Rep(Seqq[il]); 

end if; end for; end for; 


12103 
for n in N do if 


1*n eq 1 and 2°n eq 3 and 10°n eq 1 


for|if> N12] 


lOs:=sub<N|N1210s,n>; 


end if; 


end for; 
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O then 


> N1210s; #N1210s; 
Permutation group Nil 


[210s acting on a set of cardinality 10 


(4, 
(2, 
(2, 


9) (Sy 
3) (4, 
3) (4 


y 


8) (6, 
7) (S, 
6) (7, 


4 
> #N/#N1210s; 
30 


7) 
8) (6, 
9) 


2) 


> T1210:=Transversal (N,N1210s); 


> for iin 
for> ss:=[1,2,10] TI 
for> cst[prodim(1, 
for> end for; 

> m:=0; for 


i 


[ 


in 


[1..#T121 


ts, 


0] do 
L210[i]; 
ss)]:=ss; 


-432) do if cst[il] [] 


ne 


for|if> then m:=mt+1; 


Ud 


205 

> #N1210s; 

4 

> Set (N1210s); 


> for iin 
> Orbits (N1210s); 
[ 
GSe 
GSe 
GSe 
GSe 
GSe 


ti{@ @}, 
t{@ 10 @}, 
t{@ 2, 3 @}, 
t{@ 5, 8 @}, 
t{@ 4, 9, TT, 


[1..#T1210] 


end if; end for; m; 


8) (6, 
7)y 
9), 


2), 


do ([1,2,10]°N1210s) *T1210[i]; end for; 


6 @} 
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N125:=Stabiliser (N, [1,2,5]); 
SSS:={[1,2,5]}; 

SSS:=SSS°N; 

#SSS; 

120 

> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]x«ts[2]*ts[5] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 


VVV NV 


Vejen 2p 5 

25° 37. 6 

3, 1, 4 
[. lj. Sy “8 

3, 2, 4 

2 Ny 6 
> N125s:=N125; 
> for n in N do if 1*n eq 2 and 27°n eq 3 and 57n eq 6 then 
for|if> N125s:=sub<N|N125s,n>; end if; end for; 
> for n in N do if 1°n eq 3 and 2°n eq 1 and 5°n eg 4 then 
for|if> N125s:=sub<N|N125s,n>; end if; end for; 
> for n in N do if 1*n eq 1 and 27n eq 3 and 5*n eq 5 then 
for|if> N125s:=sub<N|N125s,n>; end if; end for; 
> for n in N do if 1°n eq 3 and 2°n eq 2 and 5°n eg 4 then 
for|if> N125s:=sub<N|N125s,n>; end if; end for; 
> for n in N do if 1°n eq 2 and 2°n eq 1 and 57n eg 6 then 
for|if> N125s:=sub<N|N125s,n>; end if; end for; 
> N125s; #N125s; 
Permutation group N125s acting on a set of cardinality 10 


(1, 2:5 3) (4, 5, 6) (7, 9, 8) 
6, 5) (7, 8, 9) 


( y y 
(2, 3) (4, 6) (7, 9) 
(1, 3) (4, 5) (8, 9) 
(1, 2) (5, 6) (7, 8) 
6 
> #N/#N125s; 
20 


> T125:=Transversal (N,N125s); 
> for i in [1..#T125] do 
for> ss:=[1,2,5]°T125[i]; 
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for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 


> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=m+1; end if; end for; m; 

225 

> #N125s; 

6 


> Set (N125s); 


(1, 3) (4, 5) (8, 9), 

(1, 2) (5, 6) (7, 8), 

(2, 3) (4, 6) (7, 9), 

(1, 2, 3) (4, Sy 6) (7, 9, 8), 
Id(N125s), 

(1, 3, 2) (4, 6, 5) (7, 8, 9) 


> for iin [1..#T125] do ([1,2,5]°N125s)°T125[i]; end for; 
> Orbits (N125s); 
[ 


GSet{@ 10 @}, 

GSet{@ 1, 2, 3 @}, 

GSet{@ 4, 5, 6 @}, 

GSet{@ 7, 9, 8 @} 
] 


/* Checking Orbits */ 
> Orbits(N151s); 


GSet{@ 7, 9, 8, 10 @}, 
GSet{@ 1, 2, 4, 3, 5, 6 @} 


> for m,n in IN do: for 2 an [7,1] do-it 
for|for|if> ts[l]«*ts[5]*ts[l]*ts[i] eq m*(ts[1l]*ts[1])°n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]«ts[5]*ts[l]*ts[i] eq m*(ts[1])7n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]*ts[5]*ts[l]*ts[i] eq m*(ts[l]*ts[5])7n then i; 
for|for|if> break; end if; end for; end for; 


338 


> for m,n. un; IN do tor 2. an, [7,21]. do. at 


for|for|if> ts[l]«ts[5]*ts[1]«ts[i] 
for|for|if> break; end if; end for; 
> 


> for m,n in IN do for i in [7,1] 


for|for|if> ts[l]«ts[5]*ts[1]«ts[i] 
for|for|if> break; end if; end for; 
> 


> for m,n in IN do for i in [7,1] 


for|for|if> ts[l]«ts[5]*ts[1]«ts[i] 
for|for|if> break; end if; end for; 
> 

> for m,n in IN do for i in [7,1] 
for|for|if> ts[l]«ts[5]*ts[1]«ts[i] 
for|for|if> break; end if; end for; 
> 

> for m,n in IN do for i in [7,1] 
for|for|if> ts[l]«ts[5]*ts[1]«ts[i] 
for|for|if> break; end if; end for; 
> 

> for m,n in IN do for i in [7,1] 
for|for|if> ts[l]«ts[5]«ts[l]*«ts[i] 
for|for|if> break; end if; end for; 
> 


> for m,n in IN do for i in [7,1] 
for|for|if> ts[l]«ts[5]*ts[1]«ts[i] 
for|for|if> break; end if; end for; 
> 

> Orbits (N157s); 

[ 


GSet{@ 1 @}, 
GSet{@ 5 @}, 
GSet{@ 7 @}, 
GSet{@ 9 @}, 
GSet{@ 2, 4 @}, 
GSet{@ 3, 6 @}, 
GSet{@ 8, 10 @} 


] 
> for m,n an IN «do “for aan 
for|for|if> ts[l]«ts[5]«ts[7]«ts[i] 


[1,5,7,9,2,3,8] 


eq m«(ts[1]*ts[2])“n then i; 
end for; 


do if 


eq m«(ts[l]*ts[5]*ts[1])“n then i; 
end for; 


do if 


eq mx (ts[l]*«ts[5]*ts[7])°n then i; 
end for; 


do if 


eq mx«(ts[1l]*«ts[5]*ts[8])“n then i; 
end for; 


do if 


eq m«(ts[l]*ts[2]*ts[1])°n then i; 
end for; 


do if 


eq m«(ts[l]*«ts[2]*ts[10])“n then i; 
end for; 


do if 


eq m«(ts[l]«*«ts[2]*ts[5])°n then i; 
end for; 


do. if 


eq 
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for|for|if> m«(ts[1l]*«ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 

> 

> for m,n. any IN do: for ab any P1575 9-27 35-8). do? ace 
for|for|if> ts[l]xts[5]*ts[7]x*ts[i] eq 
for|for|if> m*«(ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [1,5,7,9,2,3,8] do if 
for|for|if> ts[l]xts[5]*ts[7]«ts[i] eq 
for|for|if> mx (ts[1l]*«ts[5])*n then i; 

for|for|if> break; end if; end for; end for; 


> for m,n im IN -do for 1 an (1,5, 7,9,2,3;78] do at 
for|for|if> ts[l]xts[5]*ts[7]«ts[i] eq 
for|for|if> m«(ts[l]*«ts[2])*n then i; 

for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [1,5,7,9,2,3,8] do if 
for|for|if> ts[l]xts[5]*ts[7]x*ts[i] eq 
for|for|if> m«(ts[1l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 
> for m,n in IN do for i in [1,5,7,9,2,3,8] do if 
for|for|if> ts[l]xts[5]*ts[7]«*«ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 

> 
> Lor «m,n; am “UN do for a. an. (Ph oy 759,27, 3378-). “do: -4ack 
for|for|if> ts[l]xts[5]*ts[7]«ts[i] eq 
for|for|if> mx (ts[1l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [1,5,7,9,2,3,8] do if 
for|for|if> ts[l]xts[5]*ts[7]«ts[i] eq 
for|for|if> m«(ts[l]«ts[2]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 
> for im, na: ony EN: .do for acan, P5574 97-2) 33-84). 2do? ace 
for|for|if> ts[{l]«ts[5]*ts[7]*ts[i] eq 
for|for|if> m«(ts[1l]«ts[2]*«ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 


340 


> 

> for m,n an. INCd6, forts ane (PhS p79 7-2, 35:8.) cdock 
for|for|if> ts[l]xts[5]*ts[7]«ts[i] eq 
for|for|if> m«(ts[l]«ts[2]*«ts[5])7n then i; 
for|for|if> break; end if; end for; end for; 

> 
> £oxr im, nasa “IN“do for a an [1 5,7, 9,238) “do. tt 
for|for|if> ts[l]xts[5]*ts[7]«ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[l]*ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 

9 

> Orbits (N158s); 

[ 


GSet{@ 1 @}, 
GSet{@ 5 @}, 
GSet{@ 8 @}, 
GSet{@ 10 @}, 
GSet{@ 2, 3 @}, 
GSet{@ 4, 6 @}, 
GSet{@ 7, 9 @} 


] 

> for m,n in IN do for i in [1,5,8,10,2,4,7] do if 
for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 

for|for|if> mx (ts[1l]*«ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [1,5,8,10,2,4,7] do if 
for|for|if> ts[l]xts[5]*ts[8]xts[i] eq 

for|for|if> m«(ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 

> 
> for m,n in IN do for i in [1,5,8,10,2,4,7] do if 
for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 

for|for|if> mx (ts[1l]*ts[5])*n then i; 

for|for|if> break; end if; end for; end for; 

8 

10 

> 

> for m,n in IN do for i in [1,5,8,10,2,4,7] do if 
for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 

for|for|if> mx (ts[l]*«ts[2])*n then i; 

for|for|if> break; end if; end for; end for; 

> 


> for m,n in IN do for i in [ 


for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 


for|for|if> m«(ts[l]«ts[5]x«ts 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 


for|for|if> ts[l]xts[5]*ts[8]xts[i] eq 


for|for|if> m*«(ts[l]«ts[5]x«ts 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 


for|for|if> ts[l]xts[5]*ts[8]xts[i] eq 


for|for|if> m«(ts[l]«ts[5]«ts 


for|for|if> break; end if; end for; end for; 


> 
> for m,n in IN do for i in [ 


for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 


for|for|if> m*«(ts[l]*ts[2]x«ts 


for|for|if> break; end if; end for; end for; 


> 
> for m,n in IN do for i in [ 


for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 


for|for|if> m*«(ts[l]*«ts[2]x«ts 


for|for|if> break; end if; end for; end for; 


> 


> for m,n in IN do for i in 


for 


for|if> ts[l]xts[5]*ts[8]«ts[i] 
for|if> m*(ts[l]*ts[2]*ts[5])7n 
for|if> break; end if; end for; 


> for m,n in IN do for i in [ 


for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 


for|for|if> m*«(ts[l]«ts[5]x«ts 


for|for|if> break; end if; end for; end for; 


> 
> for m,n in IN do for i in [ 


LOPS pL 


0,2,4,7] 


for|for|if> ts[l]xts[5]*ts[8]xts[i] eq 


for|for|if> m«(ts[l]«ts[5]x«ts 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 


Lo 8eL 


0,2,4,7] 


for|for|if> ts[l]xts[5]*ts[8]xts[i] eq 


for|for|if> m«(ts[l]«ts[5]x«ts 


do 


do 


1,5,8,10,2,4,7] do if 
[1])*n then i; 
TyDi85-LOy 274-4) dor at 
[-7]:)." me HEM: ay 
,°,8,10,2,4,7] do if 
[8])*n then i; 
1,5;8,10,2,4, 7] do if 
[1])“n then i; 
1,5,8,10,2,4,7] do if 
[10])*“n then i; 
[1,5,8,10,2,4,7] do if 
eg 
then i; 
end for; 
1,.5;°3,10,2,;4, 7] -do Lt 


[l]*ts[7])*n then i; 


if 


[7] *ts[1])*n then i; 


if 


[7]*ts[5])*n then i; 


341 


342 


for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [1,5,8,10,2,4,7] do if 
for|for|if> ts[l]xts[5]*ts[8]x*ts[i] eq 

for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[3])7n then i; 
for|for|if> break; end if; end for; end for; 


2> Orbits(N121s); 


GSet{@ 10 @}, 
GSet{@ 1, 3, 2 @}, 
GSet{@ 4, 9, 7, 6, 8, 5 @} 


> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]x*ts[i] eq 
for|for|if> mx (ts[1l]*ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]xts[2]*ts[1l]xts[i] eq 
for|for|if> mx (ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]xts[2]*ts[1l]«ts[i] eq 
for|for|if> m«(ts[1l]*ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]xts[2]*ts[1l]«ts[i] eq 
for|for|if> mx (ts[l]*«ts[2])*n then i; 
for|for|if> break; end if; end for; end for; 
1 

> 


> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]xts[2]*ts[1l]x*ts[i] eq 
for|for|if> m«(ts[1l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for 21 in [10,1,4] do if 
for|for|if> ts[l]xts[2]*ts[1l]x*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7])“n then i; 


for|for|if> break; end if; end for; 
> 
> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]«ts[1l]«ts[i] 
for|for|if> m*«(ts[l]*ts[5]*ts[8])7n 
for|for|if> break; end if; end for; 
> 


> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]*ts[1]«ts[i] 
for|for|if> m«(ts[l]«ts[2]*«ts[1])7n 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]*ts[1]«ts[i] 


end for; 


do if 
eg 

then i; 
end for; 


do if 
eg 

then i; 
end for; 


do: a 
eg 


for|for|if> m«(ts[1l]«ts[2]*«ts[10])*n then i; 


for|for|if> break; end if; end for; 
> 
> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]*ts[1]«ts[i] 
for|for|if> m«(ts[l]«ts[2]*«ts[5])7n 
for|for|if> break; end if; end for; 
> 


> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]*ts[1]«ts[i] 


end for; 


do if 
eg 

then i; 
end for; 


do if 
eg 


for|for|if> m«(ts[l]l*«ts[5]*ts[1l]*«ts[7])7n then 


for|for|if> break; end if; end for; 


> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]*ts[1]«ts[i] 


end for; 


do if 
eg 


for|for|if> m«(ts[l]*«ts[5]*ts[7]*«ts[1])7n then 


for|for|if> break; end if; end for; 


> for m,n in IN do for 1 in (10,1, 4) 
for|for|if> ts[l]«ts[2]*ts[1l]«ts[i] 


end for; 


do if 
eg 


for|for|if> m«(ts[l]*«ts[5]*ts[7]*«ts[5])*n then 


for|for|if> break; end if; end for; 


> for m,n in IN do for i in [10,1,4] 
for|for|if> ts[l]«ts[2]*ts[1]«ts[i] 
for|for|if> m*«(ts[l]*«ts[5]*ts[7] «ts 
for|for|if> break; end if; end for; 
> 


> for m,n in IN do for i in [10,1,4] 


end for; 


do if 
eg 


[3])*n then 


end for; 


do if 


i; 


i; 
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for|for|if> ts[l]x«ts[2]*ts[1l]«ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[5])7n then i; 
for|for|if> break; end if; end for; end for; 

> 
> for m,n an IN do for a iam [T0,1,4], dott 
for|for|if> ts[l]xts[2]*ts[1l]x*ts[i] eq 
for|for|if> m*(ts[1l]*ts[5]*ts[8]*ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 


> 

> N1517:=Stabiliser(N, [1,5,1,7]); 
> $SS:={[1,5,1,7]}; 

> SSS:=SSS°N; 

> #S8SS; 

60 


> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]x«ts[5]*ts[1l]«*ts[7] eq 

for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 

for|for|if> ts[Rep(Seqq[i]) [3] ]*ts[Rep(Seqq[i]) [4] ] 

for|for|if> then print Rep(Seqq[i]); 

for|for|if> end if; end for; end for; 

[ Aap. Sy. hg FP J 

[ 3, 4, 3, 7 ] 

LG, 2p. Oy. Pd 

> N1517s:=N1517; 

> for n in N do if 1°n eq 3 and 5°n eg 4 and 1*n eq 3 and 

for|if> 7°n eq 7 then 

for|if> N1517s:=sub<N|N1517s,n>; end if; end for; 

> for n in N do if 1*n eq 6 and 5°n eg 2 and 1°n eq 6 and 

for|if> 7°n eq 7 then 

for|if> N1517s:=sub<N|N1517s,n>; end if; end for; 

> N1517s; #N1517s; 

Permutation group N1517s acting on a set of cardinality 10 
(2, 4) (3, 6) (8, 10) 

Ty, 3% 6)-(2,. 5, -4).¢8,. 10, 9) 

1, 3) (4, 5) (8, 9) 

Ly Gy -B)<(2). @y. 3): (8 29 10) 

1, 6) (2, 5) (9, 10) 


6 

> #N/#N1517s; 

20 

> T1517:=Transversal (N,N1517s); 


> fOr aan 


> ms 


=0; for i in 


[1..#T1517] do 

for> ss:=[1,5,1,7]°T1517[i]; 
for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 


for|if> then m:=m+1l; end if; 


245 


> #N1517s; 


a VV V~ ~ Vo 


We WME Ne St 


60 


, 4) (3, 


Set (N1517s); 


, 3, 6) (2, 


, 3) (4, 


(N1517s), 


, 6) (2, 


fOr aan 
Orbits(N1517s); 


(2 
el 
(1 
(1, 6, 3) (2, 
Id 
(1 


6) (8, 10), 

5, 4) (8, 10, 
5) (8, 9), 

4, 5) (8, 9, 
5) (9, 10) 


[1..432] do if cst[il] 


end for; 


ne 
Mm; 


[] 


[1..#T1517] do ([1,5,1,7]°N1517s) *T1517[i]; 


GSet{@ 7 @}, 
GSet{@ 1, 3, 
GSet{@ 2, 4, 


GSet{@ 8, 


N1571:=Stabil 
SS8S:={[1,5,7,1]}; 
SSS:=SSS°N; 
#SSS; 


ioe 


6 @}, 
5 @}, 
eas, 


> Seqq:=Setseq(SSS) ; 
[1..#SSS] do 


> fOr a art 


for> for n in IN do 


for 
for 
for 
for 
for 
[ 1, 
[ 9, 


> NIL 


for> if 


for|if> 
EOae |sast > 


for|if> end if; end for; 


By Ty 


] 


S, 7, 9 | 


571s:=N] 


1571; 


liser(N,[1,5,7,1]); 


ts[l]«ts[5]*ts[7]*ts[1] eg 
for|if> nxts[Rep(Seqq[i]) [1] ]*«ts[Rep (Seqq[i] 
ts[Rep (Seqq[i]) [3] ]*ts[Rep (Seqq[i]) [ 
then print Rep(Seqq[i]); 


end for; 


) 
4 


] 


2 
] 


]]* 
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end for; 


> for n in N do if 1*n eq 9 and 5°n eq 5 and 7*n eq 7 and 


for|if> 
FOr |ia-£> 


(2, 

(1, 

(1, 
4 


1*n eq 9 then 


N1571s:=sub<N|N1571s,n>; end if; 
> NI571s; #N1571s; 
Permutation group N1571s acting on a set of cardinality 10 


4) (3, 6) (8, 10) 
9) (2, 4) (3, 10) (6, 8) 
9) (3, 8) (6, 10) 


> #N/#N1571s; 


30 

> T1571 
> £Oxr. a 
for> ss 


:=Transversal (N,N1571s); 
in [1..#T1571] do 
:=[1,5,7,1]°T1571[1i]; 


for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 


> m:=0; for i in [1..432] do if cst[i] 
for|if> then m:=m+1l; end if; end for; 
275 
> 
> #N1571s; 
4 
> Set (N1571s); 
{ 
(2, 4) (3, 6) (8, 10), 
(1, 9) (2, 4) (3, 10) (6, 8), 
(1, 9) (3, 8) (6, 10), 
Id(N1571s) 
} 
> for a an, [Leck#TISTLE) do: ([1,5y474) “NLS 7hs) TLS EL. [ads 
> Orbits (N1571s); 
[ 
GSet{@ 5 @}, 
GSet{@ 7 @}, 
GSet{@ 1, 9 @}, 
GSet{@ 2, 4 @}, 
GSet{@ 3, 6, 10, 8 @} 
] 
> N1575:=Stabiliser(N, [1,5,7,5]); 
> SSS:={[1,5,7,5]}; 
> SSS:=SSS°N; 
> #SSS; 
60 


> Seqq:=Setseq(SSS) ; 


ne 
mM; 


end for; 


[] 


346 


end for; 


347 


> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[5]*ts[7]x«ts[5] eq 

for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 

for|for|if> ts[Rep(Seqq[i]) [3] ]*ts[Rep(Seqq[i]) [4] ] 

for|for|if> then print Rep(Seqq[i]); 

for|for|if> end if; end for; end for; 

[ly “5p Dye "Se J 

[ 1, 8, 6, 8 ] 

[. Lis 105. 37.10] 

> N1575s:=N1575; 

> for n in N do if 1*n eq 1 and 5°n eg 8 and 7°n eq 6 and 

for|if> 5°n eq 8 then 

if> N1575s:=sub<N|N1575s,n>; end if; end for; 

for n in N do if 1°n eq 1 and 5*n eq 10 and 7°n eq 3 and 

for|if> 5*n eq 10 then 

for|if> N1575s:=sub<N|N1575s,n>; end if; end for; 

> N1575s; #N1575s; 

Permutation group N1575s acting on a set of cardinality 10 
(2, 4) (3, 6) (8, 10) 

4, 9) (5, 8) (6, 7) 

27 De AY NB, Ty. 6) (5% “87 19) 

2, 4, 9) (3, 6, 7) (5, 10, 8) 

2, 9) (3, 7) (5, 10) 


Hh 
e) 
Phe 


6 

> #N/#N1575s; 

20 

> T1575:=Transversal (N,N1575s); 
> for a ama [L.ctTIS TS], “do 

for> ss:=[1,5,7,5]°T1575[i]; 
for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 


> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 

295 

> #N1575s; 

6 


> Set (N1575s); 
{ 


(2, 4) (3, 6) (8, 10), 
(2, 9, 4) (3, 7, 6) (5, 8, 10), 
(4, 9) (5, 8) (6, 7), 
(2, 9) (3, 7) (5, 10), 


348 


(2, 4, 9) (3, 6, 7) (5, 10, 8), 
Id (N1575s) 


for i in [1..#T1575] do ([1,5,7,5]°N1575s) “T1575[i]; end for; 
Orbits (N1575s); 


— VV Vw 


GSet{@ 1 @}, 

GSet{@ 2, 4, 9 @}, 
GSet{@ 3, 6, 7 @}, 
GSet{@ 5, 8, 10 @} 


N1573:=Stabiliser(N, [1,5,7,3]); 
SSS:={[1,5,7,3]}; 

SSS:=SSS°N; 

#SSS; 

120 

> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[5]*ts[7]«ts[3] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ]*ts[Rep(Seqq[i]) [4] ] 
for|for|if> then print Rep(Seqq[i]); 

for|for|if> end if; end for; end for; 

[. ls 2D hp oS 

[S44 bp ed 

1573s:=N1573; 

> for n in N do if 1*n eq 3 and 5°n eg 4 and 7*n eq 7 and 
for|if> 3°n eq 1 then 

for|if> N1573s:=sub<N|N1573s,n>; end if; end for; 

> N1573s; #N1573s; 

Permutation group N1573s acting on a set of cardinality 10 
Order = 2 

(1, 3) (4, 5) (8, 9) 


VVV Vo 


is 
Zz 


2 

> #N/#N15738; 

60 

> 

> T1573:=Transversal (N,N1573s); 
> for i in [1..#T1573] do 

for> Ssi=([1,5,.7, 3] T1573 [4]; 
for> cst[prodim(l1, ts, ss)]:=ss; 
for> end for; 


349 


> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=mt+1; end if; end for; m; 

399 

> #N1573s; 


2 
> Set (N1573s); 
{ 


(1, 3) (4, 5) (8, 9), 
Id (N1573s) 


for i in [1..#T1573] do ([1,5,7,3]°N1573s) “T1573[i]; end for; 
Orbits (N1573s); 


—= VV Vw 


GSet{@ 2 @}, 
GSet{@ 6 @}, 
GSet{@ 7 @}, 
GSet{@ 10 @}, 
GSet{@ 1, 3 @}, 
GSet{@ 4, 5 @}, 
GSet{@ 8, 9 @} 


N1581:=Stabiliser(N, [1,5,8,1]); 
SSS2={ 1787 hy 

SSS:=SSS°N; 

#SSS; 


VVV Vo 


60 
> Seqq:=Setseq(SSS); 

> for 2 in [L..#SSS] do 

for> for n in IN do 

for|for> if ts[l]xts[5]*ts[8]xts[1] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ]*ts[Rep(Seqq[i]) [4] ] 
for|for|if> then print Rep(Seqq[i]); 

for|for|if> end if; end for; end for; 

[iy dy By 
TO 2> 7] 
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wd 


~ 
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pa 
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[ 3, 4, 9, 3 ] 
[ 365: 259°9y, 6: J] 
[ 6, 2, 8, 6 J 
> N1581s:=N1581; 
> for n in N do if 1°n eg 2 an 
for|if> and 1°n eq 2 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1°n eg 4 an 
for|if> and 1°n eq 4 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1°n eq 2 an 
for|if> and 1°n eq 2 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1°n eq 3 an 
for|if> and 1°n eq 3 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1°n eg 4 an 
for|if> and 1°n eq 4 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1*°n eq 5 an 
for|if> and 1°n eq 5 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1*n eq 5 an 
for|if> and 1°n eq 5 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1*n eq 1 an 
for|if> and 1°n eq 1 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1°n eq 3 an 
for|if> and 1°n eq 3 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1°n eq 6 an 
for|if> and 1°n eq 6 then 
for|if> N1581s:=sub<N|N1581s,n 
> for n in N do if 1*n eq 6 an 
for|if> and 1°n eq 6 then 
for|if> N1581s:=sub<N|N1581s,n 
> N1581s; #N1581s; 
Permutation group N1581s actin 
(2, 3) (4, 6) (7, 9) 
(hp 257 4S Sa 6) Oly 8x 21 
(1, 2, 5, 6) (3, 4) (7, 9, 8 
(Ly Be 2) (35-267. SB) Ce LO, 


eq 6 


Qo ait; 
eq 3 


d if; 
eq 6 


fo Mbabane 
eq 4 


d if; 
eq 3 


G13 
eq 1 


CF tae 
eq 1 


d if; 
eq 5 


d if; 
eq 4 


Co a we 
eq 2 


GC. -1s£9 
eq 2 


Get 


g on a set 


0) 
, 10) 


and 8°n eq 


en 
an 


for; 
8°n eg 


en 
an 


for; 
8°n eg 


en 
an 


for; 
8°n eg 


en 
an 


LOL; 
8°n eg 


en 
an 


for; 
8°n eg 


en 
an 


for; 
8°n eg 


eT) 
an 


LO; 
8°n eg 


en 
an 


for; 
8°n eg 


en 
an 


for; 
8°n eq 


en 
an 


for; 
8°n eg 


end for; 
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10 


10 


10 


of cardinality 10 


lg, ep, Se 
(lg De BI ap.- 5 
(lp 2 Coe: 6) GF 
(Lg Oh CAy 5 
Klip op oes Ate 
(hip Ap 6) (29.5 
(1, 4) (3, 3) (7 
(1, 5) (3, 4) (7 
(1, 5) (2, 4, 
(Lip SAA g- OA 
(Le Steps 3y 
(2, 6) (3, 4) (7 
(2, 4) (3, 6) (8 
(Alp. (Sip 2 ay 16 
(1, 3) (4, 5) (8 
(lp by Be A 
(lie, bg: Sp 2G3 
(iy be Aye 3 
(1, 6) (2, 5) (9 

24 

> #N/#N15815s; 

5 

> 

> 

Lor a: iat Cc 58 1 | 


T1581:=Transversal (N,N1581s); 
do 


for> ss:=[1,5,8,1]°T1581 [i]; 
for> cst[prodim(1, 


for> end for; 
> m:=0; for i 


in [ 


ts, 


- 432) 


for|if> then m:=m+t1; 


360 

> #N1581s; 
24 
> Set (N1581s); 
{ 


me ps ps pes ps ps pa 
t t t t t t t 


WwW 
~ 
DOWA WB NI a 


~ 


~ 


~ 


~ 


~ 


~ 


~ 


~ 


ss)]:=ss; 


do if cst[i] ne 
nd if; end for; m; 
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~ ~ 
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~ 
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ws 
—~ 
WwW 
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ee 
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Ft 
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Orbits (N1581s); 


— VV Vw 


GSet{@ 7, 9, 8, 
GSet{@ 1, 2, 4, 


10) 
6) ( 
6) ( 
Si 


10) 
9), 
8) ( 
8), 
6) ( 
9), 
6) ( 
Df 


10) (8, 


ark 
4) ( 


for iin [1..#T1581] 


10 @}, 


3, 


’ 

7, 
7, 
7, 


Ud 


a, 


7, 


7, 
7, 


7, 
7, 


do 


Sy 


10), 


9, 


8, 


8), 


10), 


10, 
9), 
9), 


8, 


10, 


8), 


8, 


9) 


({1,5,8,1]°N1581s) “T1581 [i]; 


6 


@} 


N1585:=Stabiliser(N, [1,5,8,5]); 


] 
> 
> SSS:={[1,5,8,5]}; 
> SSS:=SSS°N; 

> #SSS; 

> Seqq:=Setseq(SSS); 
> for iin [1..#SSS] 
for> for n in IN do 


do 


for|for> if ts[l]«ts[5]«ts[8]«ts[5] 


for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts [Rep (Seqq[ 
for|for|if> ts[Rep(Seqq[i]) [3]]*ts[Rep (Seqq[i] 


for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 


Ley Dip 85-3] 
Ly 8,7 LO, 8-7] 
Ly 8% D7 8) ] 
1, 10, 5, 10 ] 
Lye Oy Ads J 
deg, Oye Sip LO 7] 


> N1585s:=N1585; 


eq 


i 
) 


] 
[ 


) 
4 


[ 
] 


2)]* 
] 
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end for; 


> for n in N do if n 
for|if> and 5“n eq 8 t 
for|if> N1585s:=sub<N| 
> for n in N do if 1°n 
for|if> and 5°n eq 8 t 
for|if> N1585s:=sub<N| 
> for nm an N do ak an 


for|if> and 57 
for|if> N1585s:=sub<N|N1585s,n>; end if; 
for n in N do if 1 


n eq 


10 


Aa 


n 


for|if> and 5°n eq 5 t 


n eq 


A 


n 


10 


eq 1 and 5*n eq 8 and 8°n eg 10 


then 


nen 


then 


n>; end if; 
eq 1 and 5*n eq 8 and 8°n eq 5 
then 

N1585s,n>; end if; 
eq 1 and 5*n eq 10 and 8°n eg 5 


for|if> N1585s:=sub<N|N1585s,n>; end if; 
> for on: an N-do: @2t 1 
for|if> and 57 


for|if> N1585s:=sub<N|N1585s,n>; end if; 
> N1585s; #N1585s; 


Permutation group N1585s actin 


(2, 3) (4, 6) (7, 
(2, Ty, Ay, Sie 9s 
(2, 9, 4) (3, 7, 
(4, 9) (5, 8) (6, 
(2, 3) (4, 7) (5, 
(2, 4, 9) (3, 6, 
(2, 6, 9, 3, 4, 
(2, 6) (3, 4) (7, 
(2, 4) (3, 6) (8, 
(2, 9) (3, 7) (5, 
(2, 7) (3, 9) (4 


L2 
> #N/#N1585s; 
0) 


9) 
6) 
6) 
7) 
8) 
ih) 
7) 
9) 


(5, 10) 


> T1585:=Transversal (N,N1585s); 
> for iin [1..#T1585] 
for> ss:=[1,5,8,5]°T1585[i]; 
for> cst[prodim(1, 


for> end for; 
> m:=0; for i 


an [Lss432) 


ts, 


for|if> then m:=mt+t1; 


370 

> #N1585s; 

12 

> Set (N1585s); 
{ 


y 


do 


ss)]:=ss; 


nd if; 


OO? ak: est: Fay] 


end for; 


ne 
mM; 


end for; 


end for; 


end for; 


eq 1 and 5*n eq 5 and 8°n eg 10 


end for; 


eq 1 and 5*n eq 10 and 8°n eg 8 


end for; 


g on a set of cardinality 10 


[] 


393 


Id(N1585s), 


(2 6; 97 353: Ay TIM A078) 7 
(2, 4) (3, 6) (8, 10), 

(2, 9) (3, 7) (5, 10), 

(2, 7, 4, 3, 9, 6) (5, 8, 10), 
(2, 9, 4) (3, 7, 6) (5, 8, 10), 
(2, 6) (3, 4) (7, 9) (8, 10), 
(4, 9) (5, 8) (6, 7), 

(2, 7) (3, 9) (4, 6) (5, 10), 
(2, 4, 9) (3, 6, 7) (5, 10, 8), 
(2, 3) (4, 6) (7, 9), 

(2, 3) (4, 7) (5, 8) (6, 9) 


for i in [1..#T1585] do ([1,5,8,5]°N1585s) “T1585[1i]; 
Orbits (N1585s); 


— V Vw 


GSet{@ 1 @}, 
GSet{@ 5, 8, 10 @}, 
GSet{@ 2, 3, 7, 9, 4, 6 @} 


] 
> N12110:=Stabiliser(N, [1,2,1,10]); 
> SSS:={[1,2,1,10]}; 

> SSS:=SSS°N; 
> #SSS; 


> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]«ts[2]*ts[l]«ts[10] eq 
for|for|if> nxts[Rep(Seqq[i]) [1] ]«ts[Rep(Seqq[i]) [2] ]* 
for|for|if> ts[Rep(Seqq[i]) [3] ]*ts[Rep(Seqq[i]) [4] ] 
for|for|if> then print Rep(Seqq[i]); 

for|for|if> end if; end for; end for; 


i, De aie. 1D 
Sf. by 3 p> LO 
Di. B <D> waO 
Di Nie Bn M00 
Typ By de. 6 
By Dy S45 16 


> N12110s:=N12110; 

> for n in N do if 1°n eq 3 and 2°n eq 1 and 17n eq 3 
for|if> and 10°n eq 10 then 

for|if> N12110s:=sub<N|N12110s,n>; end if; end for; 


304 


end for; 


> for n in N do if 1*n eq 2 and 2°n eq 3 and 17n eg 
for|if> and 10°n eq 10 then 
for|if> N12110s:=sub<N|N12110s,n>; end if; end for; 
> for n in N do if 1*n eq 2 and 2°n eq 1 and 1°n eg 
for|if> and 10°n eq 10 then 
for|if> N12110s:=sub<N|N12110s,n>; end if; end for; 
> for n in N do if 1*°n eq 1 and 2°n eq 3 and 17n eq 
for|if> and 10°n eq 10 then 
for|if> N12110s:=sub<N|N12110s,n>; end if; end for; 
> for n in N do if 1°n eq 3 and 2°n eq 2 and 17n eq 
for|if> and 10°n eq 10 then 
for|if> N12110s:=sub<N|N12110s,n>; end if; end for; 
> N12110s; #N12110s; 
Permutation group N12110s acting on a set of cardinality 10 

(4, 9) (5, 8) (6, 7) 

(Ly Sp BGR Tye Be. Bi (678) 

(ly. 37. 2e(G4e 67) OY CT 8% 29) 

(Ly 2p BYR 852 6g Oe Bye TD) 

(lye 2e B42 Se OT. Be-8) 

(Tepe 2) Cy. 6) Ch 82) 

(1, 2) (4, 9) (5, 7) (6, 8) 

(2, 3) (4, 7) (5, 8) (6, 9) 

(2, 3) (4, 6) (7, 9) 

(1, 3) (4, 8) (5, 9) (6, 7) 

(1, 3) (4, 5) (8, 9) 


2 


0 


> #N/#N12110s; 


> T12110:=Transversal (N,N12110s); 


Snorv a samme [el 


..#T12110] 


do 


ss)]:=ss; 


if cst[i] ne 
end for; m; 


for> ss:=[1,2,1,10]°T12110[i]; 
for> cst[prodim(l, ts, 
for> end for; 
> m:=0; for i in [1..432] do 
for|if> then m:=mt+1; end if; 
380 
> #N12110s; 
12 
> Set (N12110s); 
{ 
(4, 9) (5, 8) (6, 7), 
(1, 2, 3) (4, 5, 6) (7, 9, 
(Ty 2 S)(Ay 87 Op “Gp od, 


355 


356 


(2, 3) (4, 6) (7, 9), 

(1, 3) (4, 5) (8, 9), 

(1, 2) (5, 6) (7, 8), 

(1, 3) (4, 8) (5, 9) (6, 7), 

Td (N12110s), 

(2, 3) (4, 7) (5, 8) (6, 9), 
(hy, 635 2) 64y. 67° SACL 87 9); 
(15 3p 2044 Te Sp OF + 6;- 28% 
(1, 2) (4, 9) (5, 7) (6, 8) 


for i in [1..#T12110] do ([1,2,1,10]°N12110s) *T12110[i]; end for; 
Orbits (N12110s); 


—= VV Vw 


GSet{@ 10 @}, 
GSet{@ 1, 3, 2 @}, 
GSet{@ 4, 9, 7, 6, 8, 5 @} 


/*xChecking Orbits*/ 

> Orbits (N1517s); 

[ 
GSet{@ 7 @}, 
GSet{@ 1, 3, 6 @}, 
GSet{@ 2, 4, 5 @}, 
GSet{@ 8, 10, 9 @} 


] 

> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> m«(ts[1l]*«ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [7,1,2,8] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[1])“n then i; 

for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [7,1,2,8] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> mx (ts[1l]*«ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN doe for 2 in [7,1,2, 8) do Lt 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> mx (ts[l]*«ts[2])*n then i; 


307 


for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]xts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 
7 

> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]xts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for 1 an [7,1,2,83] doe if 
for|for|/if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> m«(ts[1l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [7,1,2,8] do if 
for|for|if> ts[l]xts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[2]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 


— 


> for m,n in IN do for i in [7,1,2,8] do if 

for|for|/if> ts[l]xts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[1l]«ts[2]*«ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]xts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[2]*«ts[5])7n then i; 
for|for|if> break; end if; end for; end for; 
2 
> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]xts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[1l]*ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 

> 
> For cm, nn, TN: do for. a<an, (7; 1,28) dor awe 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 


— 
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> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]xts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[5])°n then i; 
for|for|if> break; end if; end for; end for; 
> 
> £or m,n in IN do for tan [7 ,l, 25.3] do: Lt 
for|for|/if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[3])7n then i; 
for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [7,1,2,8] do if 
for|for|/if> ts[l]xts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[5])7n then i; 
for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [7,1,2,8] do if 
for|for|if> ts[l]xts[5]*ts[l]«ts[7]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [7,1,2,8] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[i] eg 
for|for|if> m«(ts[l]«ts[2]*«ts[1]*ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 
> 
> Orbits(N1571s); 
[ 

GSet{@ 5 @}, 

GSet{@ 7 @}, 

GSet{@ 1, 9 @}, 

GSet{@ 2, 4 @}, 

GSet{@ 3, 6, 10, 8 @} 
] 
> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|/if> ts[l]x«ts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> mx (ts[1l]*«ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> m«(ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 


> 


> for m,n in IN do for i in 


for|for|if> ts[l]«ts[5]«ts[7]«ts[l 


[oy 7 ele Zy 3]. (do: 1 


|stsita) eq 


for|for|if> mx (ts[1l]*«ts[5])*n then i; 
for|for|if> break; end if; 


> for m,n in IN do for i in 


for|for|if> ts[l]«ts[5]«ts[7]«ts[l 
for|for|if> m«(ts[1] 


for|for|if> break; end if; 


> for m,n in IN do for i in 


for|for|if> ts[l]«ts[5]«ts[7]«ts[1] 


for|for|if> m«(ts[l]«ts[5]x* 
for|for|if> break; end if; 


> 


> for m,n in IN do for i in 


for|for|if> ts[l]«ts[5]«ts[7]«ts[1] 


end for; 


end for; 


[Dork plkeZ Sil AO: aE 


end for; 


]xts[i] eq 
*ts[2])*n then i; 


end for; 


[op fp ly 273) do: Tt 


ts[l])7n 
end for; 


* 


ts[i] eg 
then i; 
end for; 


Loy Tp by 243) do. LE 


for|for|if> m*«(ts[l]l*ts[5]*ts[7])*n 
for|for|if> break; end if; 


a 


> for m,n in IN do for i in 


for|for|if> ts[l]«ts[5]«ts[7]«ts[1] 


end for; 


* 


ts[i] eq 
then i; 
end for; 


[5,7,1,2,3] do if 


for|for|if> mx (ts[1l]«ts[5]*«ts[8])7n 
for|for|if> break; end if; 


> 


> for m,n in IN do for i in 


for|for|if> 


for|for|if> 


ts[l]«ts[5]<«ts[ 


then i;break; e 


> for m,n in IN do for i in 


for|for|if> 


ts[l]«ts[5]<«ts[ 


end for; 


* 


ts[i] eg 
then i; 
end for; 


Op Pedy 273). dor Let 
T]xts[l]*ts[i] eg 
for|for|if> m«(ts[1l]«ts[2]*«ts[1])7n 
nd if; end for; end for; 


[S5,7,1, 
7)]*xts[1] 


for|for|if> m*«(ts[l]*«ts[2]*ts[10]) 
nd if; end for; end for; 


for|for|if> 


then i;break; e 


> for m,n in IN do for i in 


for|for|if> 


for|for|if> 


ts[l]«ts[5]<«ts[ 


then i;break; e 


> for m,n in IN do for i in 


for|for|if> ts[l]«ts[5]«ts[7]«ts[l 


2 
* 


n 


23 cdoOe LE 
ts[i] eq 


[Syd ypalg2-3)]i (doe SE 
7T]xts[l]*ts[i] eg 
for|for|if> m*«(ts[l]l*«ts[2]*ts[5])7*n 
nd if; end for; end for; 


[Dye hplte 2H 3i]y dO: LE 


309 
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for|for|if> m«(ts[l]«ts[5]*ts[l]*ts[7])7n 
for|for|if> then i;break; end if; end for; end for; 
> 

> for myn. tay IN do ‘Lor 2. an, Pop 77-15.2;,3]' der Lt 
for|for|/if> ts[l]xts[5]*ts[7]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*ts[7]*ts[1])“n 
for|for|if> then i;break; end if; end for; end for; 
> 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]xts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l]l*«ts[5]*ts[7]*«ts[5])7n 
for|for|if> then i;break; end if; end for; end for; 


> for m,n in IN do for 2 an [5,7,1,2,3] do. if 
for|for|/if> ts[l]x«ts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l]*«ts[5]*ts[7]*«ts[3])7n 
for|for|if> then i;break; end if; end for; end for; 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|/if> ts[l]xts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*ts[8]*ts[5])7n 
for|for|if> then i;break; end if; end for; end for; 


> for m,n in IN do for 1 in [5,-7,1;.2;,3] do af 
for|for|/if> ts[l]xts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[1])n 
for|for|if> then i;break; end if; end for; end for; 


> for m,n in.IN do for 4a an [5,77,-1,2,3)] do af 
for|for|/if> ts[l]xts[5]*ts[7]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l]«ts[2]*«ts[1l]*ts[10]) 7n 
for|for|if> then i;break; end if; end for; end for; 
> 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|/if> ts[l]xts[5]*ts[7]«ts[l]xts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[l]*ts[7]«*«ts[1])7n 
for|for|if> then i;break; end if; end for; end for; 
7 

> Orbits (N1575s); 

[ 


GSet{@ 1 @}, 
GSet{@ 2, 4, 9 @}, 
GSet{@ 3, 6, 7 @}, 


GSet{@ 5, 8, 10 @} 
] 
> for m,n in IN do for i in [1,2,3,5] do if 
for|for|/if> ts[l]x«ts[5]*ts[7]«ts[5]x*ts[i] eg 
for|for|if> mx (ts[1l]*ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [1,2,3,5] do if 

for|for|/if> ts[l]xts[5]*ts[7]«ts[5]x*ts[i] eg 
for|for|if> m*«(ts[1])“n then i; 

for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [1,2,3,5] do if 


for|for|if> ts[l]«ts[5]«ts[7]*« 
for|for|if> m«(ts[l]*ts[5])7n 


ts[5]*ts[1i] eg 
then i; 


for|for|if> break; end if; end for; end for; 


> 

> for m,n in IN do for i in [1 
for|for|if> ts[l]«ts[5]*ts[7]* 
for|for|if> m«(ts[l]*ts[2])7n 


plrsr2) ao af 


ts[5]*ts[i] eg 
then i; 


for|for|if> break; end if; end for; end for; 
> 
> for m,n tn LN de. fore ito '[1,2,-3;-5)) do: Zt 
for|for|/if> ts[l]x«ts[5]*ts[7]«ts[5]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 


> £Or m,n in IN-do- for 4. am [1,273 5) doe. 21t 
for|for|/if> ts[l]xts[5]*ts[7]«ts[5]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 


for m,n in IN do for 1 an [1,2,;3,.5) de if 
for|for|/if> ts[l]x«ts[5]*ts[7]«ts[5]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


> for im, n. in; EN do: EG a: <aane [,.24-35-5:])) dor ret 
for|for|/if> ts[l]xts[5]*ts[7]«ts[5]*ts[i] eg 
for|for|if> m«(ts[l]«ts[2]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 
2 
> for m,n in IN do for i in [1,2,3,5] do if 


361 


for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m*«(ts[l]*«ts[2]x«ts 


xts[5]x*xts[i] eg 
[10])*n then i; 


for|for|if> break; end if; end for; end for; 


3 

> for imi aa IN doe: Lor a. iam «| 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m*«(ts[l]*«ts[2]x«ts 


Ly 2 B7-D\ “AO. 4at 
xts[5]xts[i] eg 
[5])“n then i; 


for|for|if> break; end if; end for; end for; 


> for mano in: EN-do-“£or A. an. i[ 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m*«(ts[l]l«ts[5]*«ts 


15233 755')) AO at 
*xts[5]x*xts[i] eg 
[l]*«ts[7])*n then 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m*«(ts[l]«ts[5]x«ts 


1259375) AO Lt 
xts[5]xts[i] eg 
[7]*ts[1])*n then 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m«(ts[l]«ts[5]x«ts 


kh, 25.335) do vt 
xts[5]xts[i] eg 
[7] *ts[5])°n then 


for|for|if> break; end if; end for; end for; 


> 

> for m,n in IN do for i in [ 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m«(ts[l]«ts[5]x«ts 


1,2, 3,5] “do. Lt 
xts[5]x*xts[i] eg 
[7]*ts[3])*n then 


for|for|if> break; end if; end for; end for; 


> 

> for m,n in IN do for i in [ 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m*«(ts[l]*«ts[5]*ts 


125-3554 ao: = 
xts[5]xts[i] eg 
[8J*ts[5])*n then 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 
for|for|if> ts[l]«ts[5]«ts[7] 
for|for|if> m*«(ts[l]*«ts[5]*ts 


1,2,3,5) do Lt 
xts[5]x*xts[i] eg 
[8J*ts[1])*n then 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [ 
for|for|if> ts[l]«ts[5]«ts[7] 


dpe? -.3175D;),, CAO aE 
xts[5]x*xts[i] eg 


i; 


i; 


i; 


i; 


for|for|if> m«(ts[l]«ts[2]*«ts[1]*ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 
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> 


> for m,n an. IN do, for: a> ane |[y.2,.3;5] -de 2t 
for|for|/if> ts[l]xts[5]*ts[7]«ts[5]x*ts[i] eg 


for|for|if> m«(ts[l]«ts[5]«ts 


for|for|if> break; end if; end for; end for; 


> 


> for im, nm. say IN“do for a. an [1,5 273,-5] doe at 
for|for|/if> ts[l]xts[5]*ts[7]«ts[5]x*ts[i] eg 


for|for|if> m*(ts[l]«ts[5]x«ts 


for|for|if> break; end if; end for; end for; 


1 


> Orbits (N1573s); 


[ 


] 


GSet{@ 2 @}, 
GSet{@ 6 @}, 
GSet{@ 7 @}, 
GSet{@ 10 @}, 
GSet{@ 1, 3 @}, 
GSet{@ 4, 5 @}, 
GSet{@ 8, 9 @} 


> for m,n in IN do for i in [2,6,7,10,1,4,8] 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[3]*ts[i] eg 
for|for|if> mx (ts[1l]*«ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 


> 


> for m,n in IN do for i in [2,6,7,10,1,4,8] 
for|for|/if> ts[l]xts[5]*ts[7]«ts[3]*ts[i] eg 
for|for|if> m«(ts[1])*n then i; 


fo 
> 
> 


fo 


for m,n in IN do for i in [ 
for|for|/if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 


r|for|if> break; end if; end for; end for; 


2,6,7,10,1,4,8] 


r|for|if> m*«(ts[1l]* ts[5])*n then i; 
r|for|if> break; end if; end for; end for; 


for m,n in IN do for i in [2,6,7,10,1,4,8] 


r|for|if> ts[l]*«ts[5]«ts[7]x*«ts[3]*ts[i] eg 
r|for|if> m«(ts[l]*ts[2])*n then i; 
r|for|if> break; end if; end for; end for; 


for m,n in IN do for i in [2,6,7,10,1,4,8] 


r|for|if> ts[l]*ts[5]«ts[7]x*xts[3]*ts[i] eg 


do 


do 


do 


do 


do 


[l]«ts[7]*ts[1])*n then i; 


[7] *ts[l]«*ts[2])“n then i; 


if 


Lf 


if 


ae 
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for|for|if> m«(ts[1l]«ts[5]*ts[1])7n 
for|for|if> break; end if; end for; 
> 

> for m,n in IN do for i in 


then i; 
end for; 


[2,6,7,10,1,4,8] 


for|for|/if> ts[l]xts[5]*ts[7]«ts[3]*ts[i] eg 


for|for|if> m*«(ts[l]*ts[5]*ts[7])7n 
for|for|if> break; end if; end for; 
1 

> for m,n in IN do for i in 


then i; 
end for; 


[2,6,7,10,1,4,8] 


for|for|if> ts[l]x«ts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m*«(ts[l]*«ts[5]*ts[8])*n 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in 


then i; 
end for; 


[2,6,7,10,1,4,8] 


for|for|if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m«(ts[l]«ts[2]*«ts[1])7n 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in 


then i; 
end for; 


[2,6,7,10,1,4,8] 


for|for|/if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 
for|for|if> mx (ts[1l]«ts[2]*«ts[10])*n then i; 


for|for|if> break; 
6 
> for m,n in IN do for i in 


end if; end for; 


end for; 


[2,6,7,10,1,4,8] 


for|for|/if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m*«(ts[l]*«ts[2]*ts[5])7*n 
for|for|if> break; end if; end for; 
10 


> for m,n in IN do for i in [2,6,7,1 


then i; 
end for; 


10,1,4,8] 


for|for|/if> ts[1l]xts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m«(ts[l]«ts[5]*«ts[l]*ts 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [2,6,7,1 


end for; 


10,1,4,8] 


for|for|/if> ts[l]xts[5]*ts[7]«ts[3]*ts[i] eg 


for|for|if> m«(ts[l]«ts[5]«*«ts[7]*ts 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in 


end for; 


[2,6,7,10,1,4,8] 


for|for|/if> ts[l]x«ts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m«(ts[l]*«ts[5]*ts[7]«ts[5])7n 


for|for|if> break; end if; end for; 


end for; 


do 


do 


do 


do 


do 


do 


do 


do 


if 


if 


2 


if 


if 


if 


[7])*n then i; 


if 


[1])*n then i; 


if 


then i; 
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> 


> for m,n in IN do for i in [2,6,7,10,1,4,8] do if 
for|for|/if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m«(ts[l]*«ts[5]*«ts[7]«ts 
for|for|if> break; end if; end for; 
> 


end for; 


> for m,n in IN do for i in [2,6,7,10,1,4,8] do 
for|for|/if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 
for|for|if> m«(ts[l]* ts[5]*ts[8]*ts[5])*n then 


for|for|if> break; end if; end for; 


end for; 


> for m,n in IN do for i in [2,6,7,10,1,4,8] do 
for|for|if> ts[l]xts[5]*ts[7]«ts[3]x*ts[i] eg 


for|for|if> m«(ts[l]*«ts[5]*ts[8]x*xts[1])7n 


for|for|if> break; end if; end for; 


> for m,n in IN do for i in [2,6,7,1 74 
for|for|/if> ts[l]xts[5]*ts[7]«ts[3]*ts[i] eg 
)- 


for|for|if> m«(ts[l]«ts[2]«ts[l]*ts 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [2,6,7,1 
for|for|/if> ts[l]xts[5]*ts[7]«ts[3]*ts[i] eg 


for|for|if> m*«(ts[l]*«ts[5]*ts[l]x«ts 
for|for|if> break; end if; end for; 
4 

> for m,n in IN do for i in [2,6,7,1 


for|for|/if> ts[l]x«ts[5]*ts[7]«ts[3]x*ts[i] eg 


end for; 


Ged 


[10] 
end for; 


0,1,4,8] do 


[7]*ts[1])7n 
end for; 


10,1,4,8] do 


for|for|if> m«(ts[l]*ts[5]«ts[7]«ts 
for|for|if> break; end if; end for; 
2 

> Orbits (N1581s); 


GSet{@ 7, 9, 8, 10 @}, 
GSet{@ 1, 2, 4, 5, 3, 6 @} 


[l]«ts[2])7n 
end for; 


> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]x«ts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> m«(ts[1l]*«ts[1])*n then i; 


for|for|if> break; end if; end for; 


end for; 


> for m,n in IN do ‘for tan [7,1]: do 2r 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 


[3])“n then i; 


if 


a 


if 


then i; 


Big 


1; 


if 


then 


if 


then 


i; 


1; 
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for|for|if> m«(ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]xts[5]*ts[8]*«ts[l]x*ts[i] eg 
for|for|if> mx (ts[1l]*ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> mx (ts[l]*«ts[2])*n then i; 
for|for|if> break; end if; end for; end for; 


> /£Or-m,n im EN do: for 2 an [7h]. -de-21£ 
for|for|/if> ts[l]x«ts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> mx (ts[1l]«ts[5]*«ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for 1 in [7,1]: do if 
for|for|if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[1l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


> £or m,n in. IN do for 2 an. [7,1] “do ££ 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> mx«(ts[1l]*« ts[2]*ts[1])*n then i; 


for|for|if> break; end if; end for; end for; 
> 


> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[1l]«ts[2]*«ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[1l]*« ts[2]*«ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 
7 
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> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[1l]*ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 

> 

> £or m,n in LN do: for. tan [7,1]: de: ££ 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN -do- for 12. in [7,1] do 2£ 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[l1]* ts[5]*«ts[7]«*ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]xts[5]*ts[8]«ts[l]xts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[3])“n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]x«ts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> m«(ts[l1]* ts[5]*«ts[8]«*ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [7,1] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> m*(ts[1l]*ts[5]*ts[8]*ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]x«ts[5]*ts[8]«ts[l]xts[i] eg 
for|for|if> m«(ts[l]«*«ts[2]*«ts[1]*ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [7,1] do if 
for|for|if> ts[l]xts[5]*ts[8]«ts[l]*ts[i] eg 
for|for|if> mx (ts[l]«ts[5]*«ts[1l]«ts[7]«*«ts[1])*n then 
for|for|if> break; end if; end for; end for; 

> 

> £or m,n in IN do for 12 in [7,1] do-it 
for|for|if> ts[l]xts[5]*ts[8]«ts[l]x*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[7]«ts[1]«*ts[2])“n then 


i; 
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for|for|if> break; end if; end for; end for; 


> 


> Orbits (N1585s); 


> for m,n in IN do for i in 


t{@ 1 @}, 
t{@ 5, 8, 10 @}, 


t{@ 2, 3, 7, 9, 4, © @} 


1,5,2] do if 


[ 
for|for|if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 
for|for|if> m«x(ts[1l]* ts[1])“n then i; 


fo 


r|for 


for m 
r|for 
r|for 
r|for 


r|for 
r|for 
r|for 


r|for 
r|for 


r|for 


r|for 
r|for 


|if> break; end if; end for; end for; 


ply im JEN do: for a. an [.1,5;27]) de: a2 


1f> ts[l]xts[5]*ts[8]*«ts[5]xts[i] eg 
if> m«(ts[1])*n then i; 
if> break; end if; end for; end for; 


for m,n in IN do for i in [1,5,2] do if 


1f> ts[l]x«ts[5]*ts[8]«ts[5]xts[i] eg 
if> m«(ts[1l]*ts[5])*n then i; 
if> break; end if; end for; end for; 


for im, mW ary IN do for 2. an [1,5),2) <do- Lt 


1f> ts[1l]xts[5]*ts[8]«ts[5]x*xts[i] eg 
if> m«(ts[1l]*ts[2])*n then i; 
if> break; end if; end for; end for; 


for m,n in IN do for i in [1,5,2] do if 


|if> ts[l]«ts[5]*ts[8]*«ts[5]x*xts[i] eg 
|if> mx (ts[l]«ts[5]*ts[1])“n then i; 


for|for|if> break; end if; end for; end for; 


> 
> 
fo 


r|for 


for m,n in IN do for i in [1,5,2] do if 


|if> ts[l]«ts[5]*«ts[8]«ts[5]x*xts[i] eg 


for|for|if> m«(ts[1l]«ts[5]*«ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 


> 


> for m,n in IN do for i in [1,5,2] do if 
for|for|if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 
for|for|if> m«(ts[1l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


5 
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> for m,n in IN do for i in 


[ 


72,2] do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> m*«(ts[l]«ts[2]« 
for|for|if> break; end if; 


> for m,n in IN do for i in 


ts 


[1])*n then i; 


end for; end for; 


(1, 


5,2] do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> m«(ts[l]«ts[2]* 
for|for|if> break; end if; 


> for m,n in IN do for i in 


ts 


[10])*n then i; 


end for; end for; 


[ 


72,2] do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*xts[i] eg 


for|for|if> mx« (ts[1]«ts[2]* 
for|for|if> break; end if; 
> 

> for m,n in IN do for i in 


ts 


[5])“n then i; 


end for; end for; 


[ 


1,5,2] 


do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> mx (ts[1]*«ts[5]* 
for|for|if> break; end if; 
> 

> for m,n in IN do for i in 


ts 


[l]*ts[7])*n then 


end for; end for; 


[ 


Ly D2] 


do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> mx« (ts[1]«ts[5]* 
for|for|if> break; end if; 


> for m,n in IN do for i in 


cs 


[7]*«ts[1])*n then 


end for; end for; 


[1,5,2] 


do if 


for|for|/if> ts[l]«ts[5]*ts[8]«ts[5]x*ts[i] eg 
for|for|if> m«(ts[l]l*«ts[5]*ts[7]«*«ts[5])*n then 
end for; end for; 


for|for|if> break; end if; 


> for m,n in IN do for i in 


[ 


£560] 


do if 


for|for|/if> ts[l]x«ts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> m*«(ts[l]«ts[5]x*« 
for|for|if> break; end if; 

> 
> for m,n in IN do for i in 


ts 


[7]*ts[3])*n then 


end for; end for; 


[ 


LyD5-2 1 


do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> m*«(ts[l]«ts[5]x« 
for|for|if> break; end if; 


> for m,n in IN do for i in 


eS 


[8J*ts[5])*n then 


end for; end for; 


[ 


1,5,2] 


do if 


for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> m*«(ts[l]«ts[5]x« 


ts 


[8]*xts[1])*n then 


i; 


i; 


i; 


i; 


i; 
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for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [1,5,2] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 
for|for|if> m«(ts[l]«*«ts[2]*«ts[1]*ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [1,5,2] do if 
for|for|if> ts[l]xts[5]*ts[8]«ts[5]x*xts[i] eg 


for|for|if> m«(ts[l]«ts[5]*«ts[l]*«ts[7]«ts[1])*n then i; 


for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [1,5,2] do if 
for|for|/if> ts[l]xts[5]*ts[8]«ts[5]x*ts[i] eg 


for|for|if> m«(ts[l]«ts[5]*«ts[7]«ts[l]«*«ts[2])*n then i; 


for|for|if> break; end if; end for; end for; 
> 
> Orbits (N12110s); 


GSet{@ 10 @}, 
GSet{¢@ 15-8, 2.1}, 
GSet{@ 4, 9, 7, 6, 8, 5 @} 


> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]x*ts[i] eq 
for|for|if> mx (ts[1l]*«ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]x*ts[i] eq 
for|for|if> m«(ts[1])“n then i; 

for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]x*ts[i] eq 
for|for|if> mx (ts[1l]*ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 
> 

> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]«*ts[i] eq 
for|for|if> mx (ts[1l]*«ts[2])*n then i; 
for|for|if> break; end if; end for; end for; 
> 


370 


> for m,n in IN do for i in [ 


AG yA 


] do if 


for|for|if> ts[l]xts[2]*ts[1l]«*«ts[10]*ts[i] eq 


for|for|if> m«(ts[l]*«ts[5]x«ts 


for|for|if> break; end if; end for; 


> for m,n in IN do for Lin [1 


0,1,4 


for|for|if> ts[l]«ts[2]*ts[1]*«ts[10 
for|for|if> m«(ts[l]* ts[5]*«ts[7])7 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [ 


0,1,4 


for|for|if> ts[l]«ts[2]«ts[1l]*«ts[10 


for|for|if> m«(ts[l]«ts[5]«ts 


for|for|if> break; end if; end for; 


> 
> for m,n in IN do for i in [ 


10,1,4 


[1])*n then i; 


end for; 


]f de: 1st 
]*ts[i] eq 
n then i; 
end for; 


] do if 
]xts[i] eq 


[8])*n then i; 


end for; 


] do if 


for|for|if> ts[l]xts[2]*ts[1l]*«ts[10]*ts[i] eq 


for|for|if> m*«(ts[l]*ts[2]*ts 


for|for|if> break; end if; end for; 


10 


> for m,n in IN do for i in [1 1,4 
for|for|if> ts[l]«ts[2]*ts[1]*«ts[10 
\° 


for|for|if> m*«(ts[l]*«ts[2]x«ts 


0,1] 


[10] 


for|for|if> break; end if; end for; 


> 


> for m,n in IN do for i in [10,1,4 
for|for|if> ts[l]«ts[2]*ts[1]*«ts[10 
for|for|if> m«(ts[l]«ts[2]*«ts[5])“n then i; 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [ 


for|for|if> m*«(ts[l]«ts[5]«ts 


10,1, 4] 
for|for|if> ts[l]«ts[2]«ts[1l]*«ts[10] 


[1] «ts 


for|for|if> break; end if; end for; 


> 
> for m,n in IN do for i in [ 


10,1,4 


for|for|if> ts[l]«ts[2]*ts[1]«ts[10 


for|for|if> m«(ts[l]«ts[5]«ts 


[7] xts 


for|for|if> break; end if; end for; 


> for m,n in IN do for i in [ 


for|for|if> m«(ts[l]«ts[5]«ts 


Od eA] 
for|for|if> ts[l]«ts[2]«ts[1l]*«ts[10] 


[7] «ts 


[1])“n then i; 


end for; 


] do if 
]J*ts[i] eg 
n then i; 
end for; 


] do if 
]«xts[i] eq 


end for; 


do if 

xts[i] eq 
[7])*n then i; 
end for; 


do if 

xts[i] eq 
[1])*n then i; 
end for; 


do if 
xts[i] eq 
[5])*n then i; 
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for|for|if> break; end if; end for; end for; 
> 
> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[3])7n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[5])°n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]*«ts[10]*ts[i] eq 
for|for|if> m*(ts[1l]*ts[5]*ts[8]*ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [10,1,4] do if 
for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]x*ts[i] eq 
for|for|if> m«(ts[l]«ts[2]*«ts[1]*ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for 1 in [10,1,4] do if 

for|for|if> ts[l]xts[2]*ts[1l]*«ts[10]x*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[l]*ts[7]«ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [10,1,4] do if 

for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]*ts[i] eq 
for|for|if> mx (ts[1l]* ts[5]«*«ts[7]«*«ts[l]*ts[2])°n then i; 
for|for|if> break; end if; end for; end for; 

4 
> for m,n in IN do for i in [10,1,4] do if 

for|for|if> ts[l]x«ts[2]*ts[1l]«*«ts[10]*ts[i] eq 
for|for|/if> m*«(ts[l]*ts[5]*ts[8]«ts[5]*ts[1])°n then i; 
for|for|if> break; end if; end for; end for; 


> 

> N15171:=Stabiliser(N, [1,5,1,7,1]); 
> $SS:={[1,5,1,7,1]}; 

> SSS:=SSS°N; 

> #SSS; 

60 


> Seqq:=Setseq(SSS) ; 
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> for i in [1..#SSS] do 
for> for n in IN do 
for|for> if ts[1l]x«ts[5]*ts[l]«ts[7]*ts[1] eg 
for|for|if> nxts[Rep(Seqq[i]) [1] ]*«ts[Rep(Seqq[i]) [2 
for |for|ait>. ts [Rep (Seqq/i1]) 13] ]*tslRep (Seqq[i]) [4]. 
for|for|if> ts[Rep(Seqq[i]) [5] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 
[. Ahas Se hye Ty cil 
[i 9x5 Ope “Tp 9 il 
> N15171s:=N15171; 
> for n in N do if 1*n eq 9 and 5°n eq 5 and 17n eg 
for|if> 9 and 7°n eq 7 and 1°n eq 9 then 
for|if> N15171s:=sub<N|N15171s,n>; end if; end for; 
> N15171s; #N15171s; 
Permutation group N15171s acting on a set of cardinality 10 
(2, 4) (3, 6) (8, 10) 
(1, 9) (2, 4) (3, 10) (6, 8) 
(Ly 9)-03y 8) (6, -1.0)) 
4 
> #N/#N15171s; 
30 
> T15171:=Transversal(N,N15171s); 
> for i in [1..#T15171] do 
for> ss:=[1,5,1,7,1]°T15171[i]; 
for> cst[prodim(1, ts, ss)]:=ss; 
for> end for; 
> m:=0; for i in [1..432] do if cst[i] ne [] 
for|if> then m:=m+1; end if; end for; m; 
400 
> 
So The Sel 77] CNIS LT 1s: 
GSet {@ 


[ 1, 5, 1, 7, 


er 

> for iin [1..#T15171] 
> Orbits (N15171s); 

[ 


do ([1,5,1,7,1]7*N15171s) 


GSet{@ 5 @}, 
GSet{@ 7 @}, 
GSet{@ 1, 9 @}, 


“TI5171 [i]; 


end for; 


GSet{@ 2, 4 @}, 
GSet{@ 3, 6, 10, 8 @} 


#N1L5171s; 


N15712:=Stabiliser(N, [1,5,7,1,2 

SSS3=([Ly Se he Z) Fy 

SSS:=SSS°N; 

#SSS; 

120 

> Seqgq:=Setseq(SSS); 

> for i in [1..#SSS] do 

for> for n in IN do 

for|for> if ts[l]«ts[5]«ts[ 

for|for|if> nxts[Rep(Seqq[i 
) 
) 


VVV VV OS Ve 


7] «ts[1 

]) 
for|for|if> ts[Rep(Seqq[i]) [3 
for|for|if> ts[Rep(Seqq[i]) [5] ] 


for|for|if> then print Rep (Seqq[ 


1); 


]xts[2] 


a) 


for|for|if> end if; end for; end for; 


Ul Diy Ty 1, 2 ] 


d'Giyie So Te 
fe oa 
Gy By Be A 

15712s:=N15712; 


hZnNDNoFWOWrRH 
ES 


Hh 
1) 
R 


if> and 1*n eq 9 and 2°n eq 1 


Hh 
1) 
Hh WK 


Aa 


Hh 
e) 
i | 


Hh 
e) 
S 


if> and 1°n eq 1 and 2°n eq 9 


A 


for n in N do if 1°n eq 2 and 5 
for|if> and 1*n eq 2 and 2°n eq 9 


for n in N do if 1°n eg 2 and 5 
for|if> and 1*n eq 2 and 27n eq 1 


for|if> N15712s:=sub<N|N15712s,n>; 


> N15712s; #N15712s; 


if> N15712s:=sub<N|N15712s,n>; 
for n in N do if 1°n eq 9 and 5*n eq 5 and 7°n eq 7 
if> and 1*n eq 9 and 2°n eq 2 then 

if> N15712s:=sub<N|N15712s,n>; 
for n in N do if 1°n eq 1 and 5” 


for|if> N15712s:=sub<N|N15712s,n>; 


for|if> N15712s:=sub<N|N15712s,n>; 


then 
end 


end 
n eq 
then 
end 


“n eq 


then 
end 


“n eq 


then 
end 


[1] ]*ts [Rep (Seqq[i] 
]] «ts [Rep (Seqq[i]) 
] 


alee 


athe 
10 and 7*n eq 3 


if; 


10 and 7*n eq 3 


Elie 


6 and 7*n eq 8 


alife 


eq 
) [2 
[4] ] 


end for; 
end for; 
end for; 
end for; 


end for; 


] 


|* 


or n in N do if 1*n eq 9 and 5°n eg 6 and 77"n eg 8 
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Permutation group N15712s acting ona 
OF, 2) (3 Lp Bd 7 “Gy LO) 

10) 
10) 
7) (5, 
8) 


10, 6) 

6 

> #N/#N15712s; 

20 

> T15712:=Transversal(N,N15712s); 
> fers a ane [1 PIIS 712) do 
for> ss:=[1),5,7,1;2) TLS 722714 
for> cst[prodim(l1, ts, ss)]:=ss; 

for> end for; 

> m:=0; for i in [1..432] do if cst[i] 
for|if> then m:=mt+1l; end if; end for; 

420 

> 

> ie Sy Tels 21 NES Tess 

GSet {@ 


~ ~ 


x 
PROD Ul 


~ 


NN F WO OF 
~ 


x 
Oy 
~ 


@} 

> for i in [1..#T15712] 
> Orbits (N15712s); 

[ 


do 


GSe 
GSe 
GSe 
GSe 


t{@ 4 @}, 
t{@ 1, 9, 
t{@ 3, 7, 
t{@ 5, 6, 


2 @}, 
8 @}, 
10 @} 


#N15712s; 


N15851:=Stabiliser(N, [1,5,8,5,1]); 
SSS:={[1,5,8,5,1]}; 

SSS:=SSS°N; 

#SSS; 


NVV VV VO Ve 


©. 


set of cardinality 10 


ne 
mM; 


Gly S59 F lg 2) NLS 7128) "TVS 712 1) 3 
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end for; 
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> Seqq:=Setseq(SSS); 

> for i in [1..#SSS] do 
for> for n in IN do 
for|for> if ts[l]«ts[5]«ts 


[8]xts[5]*ts[1] eq 
for|for|if> nxts[Rep (Seqq[i 

) 

) 


8] 
]) [1] ]xts [Rep (Seqq[i]) 
for|for|if> ts[Rep(Seqq[i]) [3] ]*ts [Rep (Seqq[i]) [4] 
for|for|if> ts[Rep(Seqq[i]) [5] ] 
for|for|if> then print Rep(Seqq[i]); 
for|for|if> end if; end for; end for; 
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orn 
for|if> 
for|if> 

for n 
for|if> 
for|if> 
> for n 
for|if> 
for|if> 
> for n 
for|if> 
tS 
for n 
for|if> 
for|if> 
> for n 


Hh 
(e) 
Hh WK 


oO; 
~ 
Noo; 
~ 
hs 
~ 
No 
~ 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 


y 
LS 
15851s:=N15851; 


~ 
a 
je) 
~ 
od 
~ 
ary 
(je) 
~ 


~ 
ha 
je) 
~ 
(ee) 
~ 
are 
(je) 
~ 


6, 8 


N do 


ds:3/2n 


N do 
d 5°57 


N do 
ad. bon 


N do 
d 57n 


N do 
d: 5° 


N do 


10 


if 


1° 


eq 2 and 57 


n eq 


eq 6 and 1°n eq 2 then 


i c 


44 


if 


44 


=sub<N|N15851s,n>; end 
F eq 3 and 57 
eq 9 and 1°n eq 3 then 
=sub<N|N15851s,n>; 
eq 4 and 57 


n eq 


end 
n eq 


eq 3 and 1°n eq 4 then 


ae 


if 1 


eq 


1f 


1° 


Aa 


9 


A 


=sub<N|N15851s,n>; 
eq 1 and 57 
eq 8 and 
=sub<N|N15851s,n>; 
eq 5 and 57 
and 1*n eq 5 
=sub<N|N15851s,n>; 
eq 2 and 57 


1*n eq 1 


end 
n eq 
then 
end 
n eq 
then 
end 
n eq 


6 and 8"n eg 


if; end for; 
9 and 8"n eg 


if; end for; 
3 and 8°n eq 


if; end for; 
8 and 87n eg 


if; end for; 
9 and 8"n eg 


if; end for; 
6 and 87n eg 


10 


10 
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hh WK 


an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


abe 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 


an 


a9-n 


N do 
d 5°n 
N do 
d 5°n 
N do 
d 5°n 
N do 
d 5°n 
N do 
d 5°n 
N do 
d 5°n 
N do 


don 


N do 
d 57n 


5851s: 


N do 
d 57n 


5351S 


N do 
dS 


5851s: 


N do 
d 5°n 


5851s: 


N do 
d 57n 


S851S% 


N do 
d 57n 


5851s: 


N do 
d 57n 


eq 6 and 


qe ale 


eq 


eq 2 and 


af 1° 
eq 10 


=sub<N|N15851s,n>; 


ay ae ea 


eq 
and 


eq 


1*n eq 2 then 
=sub<N|N15851s,n>; 


end 
7 and 57n eq 


1*n eq 7 then 
=sub<N|N15851s,n>; 


end 
2 and 5 °n eq 
1*neq 2 then 
end 
3 and 57n eq 


eq 4 and 1°n eq 3 then 


=sub<N|N15851s,n>; 


if 1° 


eq 


end 
6 and 57n eq 


eq 9 and 1°n eq 6 then 


=sub<N|N15851s,n>; 


oc o48 


i a 


a ie 


if 


eq 


eq 


end 
9 and 5*n eq 


eq 6 and 1°n eq 9 then 
=sub<N|N15851s,n>; 


end 
4 and 5°n eq 


eq 3 and 1°n eq 4 then 


=sub<N|N15851s,n>; 


if 1° 


eq 


end 
1 and 57n eq 


eq 8 and 1°n eq 1 then 


=sub<N|N15851s,n>; 


oC 48 


i 


eq 


end 
8 and 57n eq 


eq 4 and 1°n eq 8 then 


=sub<N|N15851s,n>; 


eo 4A 


if 


eq l 


eq 


end 
5 and 5°n eq 


and 1°n eq 5 then 


=sub<N|N15851s,n>; end 
if 1°n eq 4 and 5°n eq 
eq 7 and 1°n eq 4 then 
=sub<N|N15851s,n>; end 
if 1°n eq 1 and 5°n eq 
eq 10 and 1*neq 1 then 
=sub<N|N15851s,n>; end 
if 1*n eq 5 and 5°n eq 
eq 1 and 1°n eq 5 then 


=sub<N|N15851s,n>; 


if 1° 


eq 


eq 7 and 


af DS 


eq 


eq 6 and 


end 
2 and 5 °n eq 


1*n eq 2 then 
=sub<N|N15851s,n>; 


end 
8 and 57n eq 


1*n eq 8 then 


if; end for; 
2 and 8°n eg 


if; end for; 


5 


10 and 8*n eq 7 


if; end for; 
4 and 8°n eq 


if; end for; 
9 and 8"n eg 


tf; -end for; 
6 and 8"n eg 


if; end for; 
3 and 8°n eq 


if; end for; 
8 and 87n eg 


if; end for; 
4 and 8°n eq 


if; end for; 
1 and 8*n eg 


tts end: for; 
7 and 8°n eq 


Ee) end for; 


10 


10 and 8°n eg 5 


if; end for; 
1 and 8*n eg 


if; end for; 
7 and 8°n eq 


if; end for; 
6 and 87n eg 


10 
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if> 


for n 


LE> 
if> 
orn 
if> 
if> 
orn 
if> 
if> 
orn 


r|if> 


if> 
or 7 
if> 
if> 
orn 
if> 
if> 
orn 
Lt> 
if> 
orn 
if> 
if> 
orn 
if> 
if> 
orn 
if> 
if> 
orn 
if> 
if> 
orn 
if> 
if> 


r> for n 


if> 
1st > 
orn 
if> 
if> 


N15851s: 


in 
an 


N15851s: 


in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
aga 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 


an 
N1 
in 
an 
Nl 


N do 
d-5n 


N do 
d) 5° 


5851s: 


N do 
d 57n 


535.183 


N do 
ae 5A 


5851s: 


N do 
d-55. 


5851s: 


N do 
dad. 5° n 


5385S: 


N do 
Colmeohenal 


5851s: 


N do 
ad 5° n 


5851s: 


N do 
d -57n 


530.583 


N do 
d 57n 


5851S: 


N do 
ad 5: A 


5851s: 


N do 
d 57n 


S38 o ss 


in N 
d 5°n 


HSILSs 


N do 
d 57n 


5851s: 


=sub<N|N15851s,n>; 
eq 9 and 57n eq 


af 2 


end 


eq 3 and 1°n eq 9 then 


=sub<N|N15851s,n>; 


if ln eq 


end 
6 and 57n eq 


eq 8 and 1°n eq 6 then 


=sub<N|N15851s,n>; 


if 17n 


eq 


eC 4A 


if 7) 


eq 


end 
1 and 5*n eq 


eq 5 and 1°n eq 1 then 
=sub<N|N15851s,n>; 


end 
7 and 57n eq 


eq 2 and 1°n eq 7 then 


=sub<N|N15851s,n>; 


if 1*n 
eq 10 


eq 
and 


=sub<N|N15851s,n>; 


if 1*n eg 


end 
2 and 5°n eg 
1*n eq 2 then 
end 
3 and 57n 


eq 4 and 1°n eq 3 then 


=sub<N|N15851s,n>; 


ae 
eq 1 


eq 


if 1*n eg 
eq 2 and 


if 1*n eg 
eq 3 and 


if 1*n eg 


and 1°n eq 10 
=sub<N|N15851s,n>; 


end 


if; end for; 


3 and 8°n eq 
if; end for; 
8 and 87n eg 
if; end for; 
5 and 8°n eq 
if; end for; 
2 and 8°n eg 


if; end for; 


10 


10 and 87n eg 6 


if; end for; 


if; end for; 


eq 4 and 8"n eg 9 


10 and 5*n eq 1 and 8°n eg 3 


then 
end 
6 and 57n eq 


1*n eq 6 then 
=sub<N|N15851s,n>; 


end 
9 and 5*n eq 


1*n eq 9 then 
=sub<N|N15851s,n>; 


end 
7 and 57n eq 


eq 5 and 1°n eq 7 then 


=sub<N|N15851s,n>; 


if 1*n eg 


end 
2 and 5°n eq 


eq 7 and 1°n eq 2 then 


=sub<N|N15851s,n>; 


Bi Sam @ 
eq 10 


eq 
and 


=sub<N|N15851s,n>; 
do if 1*n eq 6 and 5°n eg 2 and 8°n eg 


end 
3 and 5°n eq 
1*n eq 3 then 
end 


eq 2 and 1°n eq 6 then 


=sub<N|N15851s,n>; 


end 


if; end for; 


2 and 8°n eg 


if; end for; 
3 and 8°n eq 
if; end for; 
5 and 8°n eq 
if; end for; 
7 and 8°n eq 


if; end for; 


10 and 8*n eg 9 


if; end 


if; end for; 


if 1*n eq 4 and 5°n eg 8 and 8°n eg 7 
eq 8 and 1°n eq 4 then 


=sub<N|N15851s,n>; 


end 


if; end for; 
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in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


N15851s: 


in 
an 


in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 
an 
N1 
in 


N do 
d 57n 


N do 
d 5°n 
N do 
d 5°n 
N do 
d 5°n 
N do 
d 5°n 
N do 


d 5°n 


N do 
d 57n 


N15851s: 


N do 
ad’ 5:°n 


5851s: 


N do 
d 57n 


5355S: 


N do 
d 57n 


5851s: 


N do 
d 5°57 


5851s: 


N do 
ad. bon 


585 ks: 


N do 
d 57n 


S85iLSs 


N do 
d: 5° 


5851s: 


N do 


coq; 


Al val 
eq 
=sub<N|N15851s,n>; end 
if 1°n eg 4 and 57n eq 
eq 8 and 1°n eq 4 then 
=sub<N|N15851s,n>; end 
if 1°n eq 9 and 5°n eq 
eq 5 and 1°n eq 9 then 
=sub<N|N15851s,n>; end 


if 1°n eq 3 and 5°n eq 
eq 10 and 1*°n eq 3 then 
=sub<N|N15851s,n>; end 


if 1°n eq 8 and 5°n eq 
eq 4 and 1°n eq 8 then 
=sub<N|N15851s,n>; end 
if 1°n eq 3 and 5°n eq 
eq 9 and 1°n eq 3 then 
=sub<N|N15851s,n>; end 
if 1°n eq 4 and 5°n eq 
eq 7 and 1°n eq 4 then 
=sub<N|N15851s,n>; end 
if 1*°n eq 1 and 5°n eq 
eq 10 and 
=sub<N|N15851s,n>; 


end 


if 1°n eq 8 and 5°n eq 
eq 1 and 1°n eq 8 then 
=sub<N|N15851s,n>; end 


if 1°n eq 9 and 5°n eq 
eq 5 and 1°n eq 9 then 
=sub<N|N15851s,n>; end 
if 1°n eq 5 and 57n eq 
eq 9 and 1°n eq 5 then 
=sub<N|N15851s,n>; end 
if 1°n eq 5 and 57n eq 
eq 7 and 1°n eq 5 then 
=sub<N|N15851s,n>; end 


if 1°n eq 8 and 5°n eq 
eq 1 and 1°n eq 8 then 
=sub<N|N15851s,n>; end 
if 1°n eq 7 and 5°n eq 
eq 4 and 1°n eq 7 then 
=sub<N|N15851s,n>; end 
Tf Ln 


1*n eq 1 then 


if; end for; 
8 and 87n eg 


if; end for; 
5 and 8°n eq 


if; end for; 


eq 10 and 5°n eq 3 and 8°n eg 2 
3 and 1°n eq 10 then 


10 and 8*n eg 4 


if; end for; 
4 and 8°n eq 


tf; end for; 
9 and 8"n eg 


if; end for; 
7 and 8°n eq 


if; end for; 


10 


10 and 8*n eq 8 


if; end for; 
1 and 8*n eg 


if; end for; 
5 and 8°n eq 


if; end for; 
9 and 8"n eg 


tf; -end for; 
7 and 8°n eq 


If; end for; 
1 and 8*n eg 


if; end for; 


4 and 8°n eq 5 


if; end for; 


eq 10 and 5°n eq 2 and 8°n eq 1 
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for|if> and 5°n eq 2 and 1°n eq 10 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 

> for n in N do if 1*n eq 7 and 5°n eq 2 and 8°n eq 2 

for|if> and 5°n eq 4 and 1°n eq 7 then 

i1f> N15851s:=sub<N|N15851s,n>; end if; end for; 

for n in N do if 1°n eq 6 and 5*n eq 9 and 8°n eg 8 

for|if> and 5°n eq 9 and 1°n eq 6 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 
for n in N do if 1°n eq 5 and 5°n eq 7 and 8°n eq 1 

rjif> and 5°n eq 7 and 1°n eq 5 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 
for n in N do if 1°n eq 10 and 5*n eq 1 and 8°n eg 2 

for|if> and 5°n eq 1 and 1°n eq 10 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 
for n in N do if 1°n eq 7 and 5°n eq 5 and 8°n eq 2 

for|if> and 5°n eq 5 and 1*°n eq 7 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 


Hh 
(0) 
Hh WK 


44 


for n in N do if n eq 10 and 5°n eq 2 and 8°n eg 3 

rjif> and 5°n eq 2 and 1°n eq 10 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 
for n in N do if 1°n eq 9 and 5°n eq 6 and 8°n eq 5 

for|if> and 5°n eq 6 and 1*n eq 9 then 

i1f> N15851s:=sub<N|N15851s,n>; end if; end for; 

for n in N do if 1°n eq 6 and 5°n eq 8 and 8°n eg 9 

for|if> and 5°n eq 8 and 1°n eq 6 then 

if> N15851s:=sub<N|N15851s,n>; end if; end for; 

for n in N do if 1°n eq 8 and 5*n eq 6 and 8°n eg 4 

for|if> and 5°n eq 6 and 1*n eq 8 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 

> for n in N do if 1*n eq 10 and 5°n eq 3 and 8°n eg 1 

for|if> and 5°n eq 3 and 1*°n eq 10 then 

for|if> N15851s:=sub<N|N15851s,n>; end if; end for; 

> N15851s; #N15851s; 

Permutation group N15851s acting on a set of cardinality 10 
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(1, 4, 5, 3) (2, 6) (7, 9, 10, 8) 
(27. Tp cap Sp Op 70) (Sy 8y 10) 
(2, 9, 4) (3, 7, 6) (5, 8, 10) 
(1, 5, 9, 3, 4, 8) (6, 10, 7) 
(le Di 9p. O72 SIMS 4G L0G, “Tp 63) 
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120 

> #N/#N15851s; 


> T15851:=Transversal (N,N15851s); 


> for i in [1..#T15851] 


for> ss:=[1,5,8,5,1]°T15851 [il]; 


for> cst[prodim(1, ts, ss)]:=ss; 
for> end for; 
> m:=0; for i in [1..432] do if cst[i] 
for|if> then m:=mt+1l; end if; end for; 
421 
> 
> [1,5,8,5,1]°N15851s; 
GSet {@ 
fi LAS Sy Sy ak: Ty 

3, 9, 47 9p 3 ye 

4,3, Ty By 4 Jy 

Lj: 28ip LOY Bye 2 7 

Sg a alee Pes S|itp 

23 Oy Ty 6% <2) Vig 

Lp, Lap Da Lap, Se alley 

Zin LOR VT. LO; <2 Vy 

3350 By 105. <4 50 3 5 

Oy: Oy. 25 Op Oo 

9, 6), Sp 6, 9 1, 

4, 3, 8, 3, 4 1, 

ddisge 1 Biya Oi. SO: en ey 


ne 
mM; 
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> for i in [1..#T15851] do ([1,5,8,5,1]°N15851s) *T15851 [i]; 


> Orbits (N15851s); 
[ 
GSet{@ 1, 3, 4, 5, 2, 7, 6, 9, 8, 10 @} 
] 
> #N15851s; 
120 
/*Checking Orbits*/ 
> Orbits (N15171s); 
[ 
GSet{@ 5 @}, 
GSet{@ 7 @}, 
GSet{@ 1, 9 @}, 
GSet{@ 2, 4 @}, 
GSet{@ 3, 6, 10, 8 @} 


] 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]«ts[5]*ts[1l]«ts[7]«ts[l]*«ts[i] 
for|for|if> mx (ts[1l]*«ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 

> 

> fer m,n in. IN do £or 41 an 15, 7,1,2;,3') *do 2t 
for|for|if> ts[l]«ts[5]*ts[1l]*«ts[7]«ts[l]*«ts[i] 
for|for|if> m«(ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 

> 
> for m,n im IN do for 1 an [5, 7,1, 2,3) do if 
for|for|if> ts[l]«ts[5]*ts[1l]*«ts[7]«ts[l]*ts[i] 
for|for|if> mx (ts[1l]*«ts[5])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]«ts[5]*«ts[1l]«ts[7]«ts[l]*«ts[i] 
for|for|if> m«(ts[1l]*«ts[2])*n then i; 
for|for|if> break; end if; end for; end for; 


> £or mM, hin IN do: “for Lain [,-77-b; 27:3); do: Lt 
for|for|if> ts[l]«ts[5]«ts[l]«ts[7]«ts[l]«ts[i] 


eq 


eq 


eq 


eq 


eq 
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end for; 
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for|for|if> m«(ts[l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]*ts[5]*ts[l]«ts[7]x*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN deo for 2 an [5, 7,1, 2,3) do.21£ 
for|for|if> ts[l]x*ts[5]*ts[l]«ts[7]x*xts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[2]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[l]*ts[i] eq 
for|for|if> mx (ts[1l]«ts[2]*«ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for 2 in [5,7, 1, 2,3) do. 2t 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[2]*«ts[5])“n then i; 
for|for|if> break; end if; end for; end for; 


> for m,n in. IN do £0r 2 an [5;,7,1;,2;, 3] -do Lt 
for|for|if> ts[l]xts[5]*ts[l]«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[l]*ts[7])“n then i; 
for|for|if> break; end if; end for; end for; 

1 
> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|/if> ts[l]x«ts[5]*ts[l]«ts[7]*xts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

7 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[5])7n then i; 
for|for|if> break; end if; end for; end for; 

> 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]*ts[5]*ts[l]«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[3])°n then i; 
for|for|if> break; end if; end for; end for; 


> for mM, in LN do: for: tan [-5,-7)b;,273); dot 
for|for|if> ts[l]x«ts[5]*ts[l]«*«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[5])°n then i; 
for|for|if> break; end if; end for; end for; 


for m,n im IN-do--for a. anm [5,/,-1,-2;-3] do: Lt 
for|for|/if> ts[l]x«ts[5]*ts[l]«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[1])7n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]xts[5]*ts[l]«ts[7]x*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«*«ts[2]*ts[1]*ts[10])*n then i; 
for|for|if> break; end if; end for; end for; 
5 

> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«ts[7]x*ts[l]*ts[i] eg 
for|for|if> m«(ts[l]«ts[5]*«ts[l]*ts[7]«*«ts[1])7n 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]x«ts[5]*ts[l]«*«ts[7]*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]«ts[l]«ts[2])7n 
for|for|if> break; end if; end for; end for; 


> for m,n in IN do for i in [5,7,1,2,3] do if 
for|for|if> ts[l]«ts[5]*ts[l]«ts[7]x*xts[l]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*«ts[5]«*«ts[1])7n 
for|for|if> break; end if; end for; end for; 
> 
> Orbits (N15712s); 
[ 

GSet{@ 4 @}, 

GSet{@ 1, 9, 2 @}, 

GSet{@ 3, 7, 8 @}, 

GSet{@ 5, 6, 10 @} 


] 


> for m,n in IN do for i in [4,1,3,5] do if 


then 


then 


then 


i; 


1; 


i; 
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for|for|if> ts[l]«ts[5]*«ts[7]«ts[l1]* 
for|for|if> m«(ts[1l]*«ts[1])*n then i 
for|for|if> break; end if; end for; 
> 

> for m,n say IN doe: Lor as an [47,35 
for|for|if> ts[l]«ts[5]*«ts[7]«ts[l1]* 
for|for|if> m«(ts[1])“n then i; 
for|for|if> break; end if; end for; 


> fOr m,n an. EN -do-for A. am. [4nd 38 75 
for|for|if> ts[l]«ts[5]*«ts[7]«ts[l]* 
for|for|if> m«(ts[1l]*«ts[5])*n then i 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [4,1,3,5 
for|for|if> ts[l]«ts[5]«ts[7]*«ts[l]* 
for|for|if> m«(ts[l]*«ts[2])*n then i 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [4,1,3,5 
for|for|if> ts[l]«ts[5]*«ts[7]«ts[l1]* 
for|for|if> m«(ts[1l]«ts[5]*«ts[1])7n 
for|for|if> break; end if; end for; 
> 


— 


> for m,n in IN do for i in [4,1,3,5 
for|for|if> ts[l]«ts[5]*«ts[7]«ts[l]* 
for|for|if> m«(ts[l]«ts[5]*«ts[7])7n 
for|for|if> break; end if; end for; 
> 
> for m,n in IN do for i in [4,1,3,5 
for|for|if> ts[l]«ts[5]*«ts[7]«ts[l]* 
for|for|if> m*(ts[1l]*ts[5]*ts[8])7n 
for|for|if> break; end if; end for; 


> for m,n in IN do for i in [4,1,3,5 
for|for|if> ts[l]«ts[5]*«ts[7]«ts[l1]* 
for|for|if> m«(ts[1l]«ts[2]*«ts[1])7n 
for|for|if> break; end if; 
for|for> end for; end for; 


> for im, W-aay IN do for a an [41,35 
for|for|if> ts[l]«ts[5]«ts[7]«ts[l1]* 


ts[2]«ts[i] 


end for; 


i saoe ast 
ts[2]«ts[i] 


end for; 


] do if 
ts[2]«ts[i] 


end for; 


] do if 
ts[2]«ts[i] 


end for; 


] do if 
ts[2]«ts[i] 
then i; 
end for; 


] do if 
ts[2]«ts[i] 
then i; 
end for; 


] do if 
ts[2]«ts[i] 
then i; 
end for; 


] do if 
ts[2]«ts[i] 
then i; 


] do if 
ts[2]«ts[i] 


for|for|if> m«(ts[1l]«ts[2]*«ts[10])*n then i; 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


eq 
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for|for|if> break; 
for|for> end for; 
> 


end if; 
end for; 


> for m,n in IN do for i in [4,1,3,5] do if 
for|for|/if> ts[l]x«ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[2]*«ts[5])“n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[1l]*ts[7])“n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]x*xts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[1])“n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

a 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|/if> ts[l]x*ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[5])7n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

4 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[3])“n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

3 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[5])7n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]xts[5]*ts[7]«ts[l]*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[1])“n then i; 
for|for|if> break; end if; 
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for|for> end for; end for; 
> 
> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]«ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]*«ts[2]*«ts[1]*ts[10])*n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 


> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[l]*«ts[7]«ts[1])*n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 


> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]xts[5]*ts[7]«ts[l]*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[7]«ts[1l]«ts[2])*n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [4,1,3,5] do if 
for|for|if> ts[l]x«ts[5]*ts[7]«ts[l]x*ts[2]*ts[i] eq 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*ts[5]«*«ts[1])*n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> Orbits (N15851s); 

[ 


GSet{@ 1, 3, 4, 5, 2, 7, 6, 9, 8, 10 @} 
] 
> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]x«ts[5]*ts[8]«ts[5]x*ts[l]*ts[i] eq 
for|for|if> mx (ts[1l]*«ts[1])*n then i; 
for|for|if> break; end if; end for; end for; 
> 


> for m,n in IN do for i in [1] do if 

for|for|if> ts[l]x«ts[5]*ts[8]«*«ts[5]xts[l]*ts[i] eq 
for|for|if> m«(ts[1])*n then i; 

for|for|if> break; end if; end for; end for; 


> for m,n an IN do for a an [1] dott 
for|for|if> ts[l]x«ts[5]*ts[8]«ts[5]x*ts[l]*ts[i] eq 
for|for|if> mx (ts[1l]*ts[5])*n then i; 


for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [1] do if 
for|for|if> ts[1l]«ts[5]*ts[8]«ts[5]«ts[l]«ts[i] 
for|for|if> mx (ts[1l]*«ts[2])*n then i; 
for|for|if> break; end if; end for; end for; 

> 

> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]«ts[5]*ts[8]«ts[5]«ts[l]«ts[i] 
for|for|if> m«(ts[l]«ts[5]*«ts[1])“n then i; 
for|for|if> break; end if; end for; end for; 

> 


> for m,n in IN do for i in [1] 


do if 


for|for|if> ts[l]«ts[5]*«ts[8]*«ts[5]«ts[l]*«ts[i] 


for|for|if> m*«(ts[l]«ts[5]*ts 
for|for|if> break; end if; 
> 

> for m,n in IN do for i in [1] 


[7])*n 
end for; 


then i; 
end for; 


do if 


for|for|if> ts[l]«ts[5]*ts[8]«ts[5]«ts[l]*ts[i] 
for|for|if> m«(ts[1l]«ts[5]*«ts[8])“n then i; 
for|for|if> break; end if; end for; end for; 


> 
> for m,n. an EN do. fore: arn [1] 


do: 1 


for|for|if> ts[1l]«ts[5]*ts[8]«ts[5]«ts[1l]«ts[i] 
for|for|if> m«(ts[l]«ts[2]*«ts[1])"“n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [1] do if 


for|for|if> ts[1l]«ts[5]*ts[8]«ts[5]«ts[l]«ts[i] 
for|for|if> mx (ts[1l]«ts[2]*«ts[10])*n then i; 
for|for|if> break; end if; 

for|for> end for; end for; 


a 


> for m,n in IN do for i in 


do if 


then i; 


for|for|if> ts[1l]«ts[5]*ts[8]«ts[5]«ts[1l]«ts[i] 
for|for|if> m*(ts[l]*ts[2]*ts[5])7n 
for|for|if> break; end if; 

for|for> end for; end for; 

> 


> for m,n in IN do for i in 


[1] 


do if 


for|for|if> ts[l]«ts[5]*«ts[8]«ts[5]«ts[l]*«ts[i] 


for|for|if> m«(ts[l]l*«ts[5]*ts[l]*«ts[7])7n 
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eq 


eq 


eq 


eq 


eq 


eq 


eq 


eq 


then i; 


for|for|if> break; end if; 
for|for> end for; end for; 
> 


> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]«ts[5]«ts[8]«ts[5]*«ts[l1]* 
for|for|if> m«(ts[l]«ts[5]*«ts[7]*ts[1])“n 
for|for|if> break; end if; 

for|for> end for; end for; 


> for mn in TNo- do for a. an Pahl) - do. 2t 
for|for|if> ts[l]«ts[5]*«ts[8]*«ts[5]«ts[1l]+* 
for|for|if> m*(ts[1l]*ts[5]*ts[7]*ts[5])7n 
for|for|if> break; end if; 

for|for> end for; end for; 


> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]«ts[5]«ts[8]«ts[5]*«ts[l1]* 
for|for|if> m«(ts[l]«ts[5]*ts[7]*ts[3])n 
for|for|if> break; end if; 

for|for> end for; end for; 

> 

> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]«ts[5]*«ts[8]*«ts[5]«ts[l]+* 
for|for|if> m«(ts[l]«ts[5]*ts[8]*ts[5])n 
for|for|if> break; end if; 

for|for> end for; end for; 

1 
> for m,n am DNodo-f£er ae am [Ak]! “de at 
for|for|if> ts[l]«ts[5]*ts[8]*«ts[5]«ts[1l]* 
for|for|if> m«(ts[l]«ts[5]*ts[8]*ts[1])n 
for|for|if> break; end if; 

for|for> end for; end for; 


> for m,n in IN do for i in [1] do if 


ts[i] eg 
then i; 


ts[i] eq 
then i; 


ts[i] eq 
then i; 


ts[i] eq 
then i; 


ts[i] eq 
then i; 


for|for|if> ts[l]x«ts[5]*ts[8]«ts[5]x*xts[l]*ts[i] eq 


for|for|if> m«(ts[l]«*«ts[2]*«ts[1]*ts[10]) 7n 
for|for|if> break; end if; 
for|for> end for; end for; 


> for m,n in IN do for i in [1] do if 


for|for|if> ts[l]xts[5]*ts[8]«*«ts[5]x*ts[l]*ts[i] eq 
for|for|if> m«(ts[l]l*«ts[5]*ts[l]«ts[7]*ts[1])7n 


for|for|if> break; end if; 


then i; 


then 


i; 
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for|for> end for; end for; 
> 
> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]«ts[5]*ts[8]«ts[5]«ts[l]«ts[i] 
for|for|if> m«(ts[l]«ts[5]*«ts[7]«ts[l]«ts[2])7n 
for|for|if> break; end if; 

for|for> end for; end for; 


> for m,n in IN do for i in [1] do if 
for|for|if> ts[l]«ts[5]*ts[8]«ts[5]«*«ts[1l]«ts[i] 
for|for|if> m«(ts[l]«ts[5]*«ts[8]*«ts[5]«*«ts[1])7n 
for|for|if> break; end if; 

for|for> end for; end for; 

> 
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eq 
then i; 


eq 
then i; 
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